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16K APPLE II $1195.00 

• We are Apple Headquarters. Buy from us and let us help you get the 
most from your Apple. 

• Free software with purchase of Apple. Choose up to $100.00 worth of 
software from over 100 selections in our Apple software catalog. 

• Our unique Apple II software catalog gives a short critique on each 
program so that you know what you are buying before you buy. 

• We also have numerous selections of software free with any purchase. 

• We offer service contracts for all equipment we sell. 

• We provide demonstrations and orientation services for schools and 
businesses anywhere in Los Angeles or Orange Counties, California. 
Call for information regarding this free service. 



8K COMMODORE PET . . . $795.00 

• FREE $ 50.00 worth of software of your choice with each pet. 

• Software Over 50 programs now available and still growing. Send 

for our software catalog. 

• In Stock Off the shelf deliveries 

• Service We have an on site service department. 

• Users group now forming 



BLANK CASSETTES 



C-10 BLANK CASSETTES (W/O BOX) FOR MICRO COMPUTING. 
$ 1.00 Ea. Other lengths will be available in the future. 
$ 7.50 for 10 Call or write for quotes on larger quantities. 
$32.50 for 50 Add 10% (minimum $2.00) for shipping and handling. 

16K RAM FOR APPLE II 

• 4116 Chips. 8 per set makes 16K RAM. Just any 41 16 chips will not work 
in the Apple 1 1 . 350NS or slower will not work properly. 250NS chips are 
adequate. 200NS chips are preferable. 

• 200NS chips. Tested and guaranteed , $ 95.00 per set. 

• Add $ 2.00 for shipping and handling. 








QUANT. 


ITEM 


PRICE 


ABOVE ITEMS ARE NORMAL STOCK ITEMS. DUE TO CIRCUMSTANCES 
BEYOND OUR CONTROL, WE ARE SOMETIMES TEMPORARILY OUT OF STOCK. 
PLEASE CHECK APPROPRIATE BOX BELOW. 








CERTIFIED CHECK, MONEY ORDER, VISA OR MASTER CHARGE ORDERS 
SHIPPED SAME DAY. NO COD. ALLOW 2 WEEKS FOR PERSONAL CHECK TO 
CLEAR. 








CALIFORNIA RESIDENTS, ADO 6% SALES TAX 




PLEASE BACK ORDER n DO NOT BACK ORDER i— , 
IF OUT OF STOCK LJ IF OUT OF STOCK l_l 


SHIPPING & HANDLING. 
ADD $10.00 FOR COMPUTER SYSTEM. 




IF USING CREDIT CARD. CHECK BOX AND ENTER CARD NUMBER BELOW. 


TOTAL 




MASTER CHARGE O VISA [Z3 



I saaoa® - 1 



APRIL 1979 
ISSUE NUMBER ELEVEN 



TABLE OF CONTENTS 

In This Issue/MICRO Interrupts 

An Apple II Program Edit Aid 
by Alan G. Hill 

Lifesaver 
by J. Stelly 

Corrected KIM Format Loader for SYM-1 
by Nicholas J. Vrtis 

A Close Look at the Superboard II 
by Bruce Hoyt 

EKIM or MAXI-KIM 

by Andrew V. W. Sensicle 

A Cassette Operating System for the Apple 
by Robert A. Stein, Jr. 

ASK the Doctor - Part III 
by Robert M. Tripp 



The MICRO Software Catalog: 
by Mike Rowe 

SYM-1 6522-Based Timer 
by John Gieryic 

The TVT-6: A User's Report 
by Edward Chalfin 

6502 Bibliography - Part X 
by William R. Dial 

The Ultimate PET Renumber 
by Don Rindsberg 



VII 



12 
15 
19 
21 
25 
29 
31 
34 
35 
37 



|Maoasr| 



STAFF 

Editor/Publisher 
Robert M. Tripp 

Business Manager 
Donna M. Tripp 

Administrative Assistant 
Susan K. Lacombe 

Circulation Manager 
Maggie Fisher 

Distribution 
Eileen M. Enos 
Carol A. Stark 

Micro-Systems Lab 
James R. Witt 

Gofer 

Fred Davis 



MICRO™ is published monthly by: 

The COMPUTERIST*, Inc. 
P.O. Box 3 
So. Chelmsford, MA 01824 

Controlled Circulation postage paid at 

Chelmsford, MA 01824 

Publication Number: COTR 395770 

Subscription in US: $12.00/12 Issues 

Entire contents copyright e 1979 by: 

The COMPUTER I ST*, Inc. 



ADVERTISER'S INDEX 



A B Computers 

Classified Ads 

Compas Microsystems 

Computer Forum 

Computer Components 

The Computerist 

Connecticut Microcomputer 

Dr. Daley 

Enclosures Group 

H. Geller Computer Systems 

Hudson Digital Electronics 



12 MICRO 

45 Optimal Technology, Inc. 

BC P.S. Software House 

IFC Plainsman Micro Systems 

4 Programma International 

8 Progressive Coftware 

24 Seawell Marketing 

27 Softside Software 

2 Sybex 

36 West Side Electronics 

33 



45 
26 
47 
32 
48 
16 
28 
IBC 



Please address all correspondence, subscriptions and address changes to: 
MICRO, P.O. Box 3, So. Chelmsford, MA 01824 



ittaaoaai 



PERFECT AIM 




ATTRACTIVE FUNCTIONAL PACKAGING 
FOR YOUR AIM-65 MICROCOMPUTER 

• Professional Appearance 

• Striking Grey and Black 
Color Combination 

• Protects Vital Components 



ENGINEERED SPECIFICALLY FOR 
THE ROCKWELL AIM-65 

• All Switches Accessible 

• Integral Reset Button 
Actuator 

• Easy Paper Tape Replacement 

EASILY ASSEMBLED 

• Absolutely No Alteration 
of AIM-65 Required 

• All Fasteners Provided 

• Goes Together in Minutes 



MADE OF HIGH IMPACT STRENGTH 
THERMOFORMED PLASTIC 

• Kydex 100* 

• Durable 

• Molded-ln Color 

• Non-Conductive 

AVAILABLE FROM STOCK 

• Allow Three to Four Weeks 
for Processing and Delivery 

• No COD's Please 

• Dealer Inquiries Invited 



TO ORDER: 

NAME .__ 
STREET ..... . 

CITY 

STATE _. 



1 . Fill in this Coupon (Print or Type Please) 

2. Attach Check or Money Order and Mail to: 



ZIP 



SAE1-1(s) 



Please Ship Prepaid 

@ $43.50 each 
California Residents Please Pay 

$46.33 (Includes Sales Tax) 

*TM Rohm & Haas 
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IN THIS ISSUE 



Andrew V. W. Sensicle increases the power of the 
basic KIM-1 with "EKIM OR MAXI-KIM", a small, 
page 17 monitor extension. This supports a PC 
"decrement" to compliment the normal "increment" 
function, "open up" and "close up" modes to move 
blocks of data to make room for adding code , and 
a "branch" calculator which simplifies determin- 
ing the relative branch addresses. 

Robert A. Stein, 3r. provides "A CASSETTE OPER- 
ATING SYSTEM FOR THE APPLE II" which makes it 
possible to maintain a library of programs which 
can be loaded by name from cassette. The arti- 
cle includes a cassette control circuit as well 
as the programs in assembler and BASIC to run 
the system. 

Alan G. Hill presents "AN APPLE II PROGRAM EDIT 
AID" which helps the user locate all occurences 
of any variable name, character string, or BASIC 
statement. The article includes a short assem- 
bler level program and a BASIC demo program. 

3. Stelly makes it a lot easier to use the game 
of LIFE on your PET with his "LIFESAVER" . This 
program supports creating a LIFE pattern, run- 
ning LIFE at various rates, and saving and load- 
ing LIFE patterns on cassette. 

Nicholas J. Vrtis helps overcome the SYM-1 ' s KIM 
tape "2F" problem with a "CORRECTED KIM 
tape "2F" problem with a "CORRECTED KIM FORMAT 
LOADER FOR SYM-1". This program is carefully 
written with an interesting "trick" so that it 
does not itself contain a "2F" even though it 
must test for this troublesome character. 

Bruce Hoyt comes through with a lot of good info 
on the OSI with "A CLOSE LOOK AT THE SUPERBOARD 
II". In addition to an overview, he presents a 
cassette save/hex memory dump program and a very 
useful table of memory usage. 

Robert M. Tripp continues "ASK THE DOCTOR", a 
series on the AIM/SYM/KIM family of microcom- 
puters, with a "Corrected AIM Sync Program", a 
"Patch for the AIM Disassembler", a "SYM Tape 
Evaluation", and "Comments on Synertek BASIC". 
Most of the info in this month's section has 
been provided by other ASK users. 

"THE MICRO SOFTWARE CATALOG" continues with ten 
new entries. 

John Gieryic has a tutorial article on a "SYM 
6522-8ASED TIMER" that gives insight into the 
workings of the 6522 VIA as well as the SYM. 

Edward Chalfin has "THE TVT-6: A USER'S REPORT" 
which give his experiences and impressions of 
Don Lancaster's inexpensive method of getting a 
video signal out of a KIM-1. 

William R. Dial continues to cover the expanding 
6502 literature in his "6502 BIBLIOGRAPHY". 

Don Rindsberg presents a major program in "THE 
ULTIMATE PET RENUMBER". This complete program 
can be used to rapidly renumber BASIC programs. 
The article also includes other useful info. 
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The BEST of the PET GAZETTE has recently been 

published and should be of interest to all PET 

owners. It is available for $9.95 from: 

Microcomputer Resource Center, Inc. 

1929 Northport Drive, Room 6 

Madison, WI 53704 

6502 COMPUTER GROUPS 

The New England Apple Tree is now meeting on the 
third Wednesday of each month, 7 - 10:00 PM, at 
the cafeteria of the MITRE Corp. in Bedford, MA. 
You can contact, for further information: 

Richard F. Suitor 

166 Tremont Street 

Newton, MA 02158 

The Carolina Apple Core has been formed in the 
Research Triangle Area of North Carolina. The 
monthly meetings are on the third Tuesday of the 
month at different locations. Annual dues are 
$5.00 and include a monthly newsletter. Contact 

F. "Butch" Clayton, President 

5212 Inglewood Lane 

Raleigh, NC 27609 

919/682-3756 or 596-8970 

New York City now has an Apple users group: The 

Big Apple Users Group. Meetings are the second 

Tuesday of every month at the Computer Mart of 

Manhattan at 6:30 PM. For further info contact: 

Neil Shapiro 

34 Spencer Drive 

Bethpage, NY 11714 

516/579-4295 (home) 

212/262-4808 (office) 

The Apple Corps of San Diego is publishing an 
eight page newsletter. Unfortunately, by the 
time it reaches us, the information on the next 
meeting is too dated for us to print. The 
person to contact for information is: 

Phillip A. Lemon 

5485 Repecho Drive, L=108 

San Diego, CA 92124 

714/560-7962 

***** ATTENTION ALL 6502 CLUBS ***** 

Now that MICRO is published monthly, we can get 
the word out on when and where you are meeting - 
if you get the word in to us. We need times and 
dates and places by the first of the preceeding 
month - April 1 for the May issue and so forth. 
Also, please put us on your mailing list for any 
newsletter or other material you send out. We 
want to help your club prosper by giving it as 
much exposure as possible, but we need your in- 
put to make it happen. 

*** On The Cover *** 

With all of the new 6502 based microcomputers, 
it is easy to forget about the KIM-1 which was 
the first 6502 system. Many thousands have been 
sold, and after a period of production problems, 
the quality of the KIM-1 has been remarkably im- 
proved recently. Considering all of the arti- 
cles we continue to receive about the KIM-1, it 
looks as though this system is here to stay for 
a long time. 
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apple ii 



PET 



SYSTEMS* 
Apple II 16K ram S 1195 00 • Commodore pet 8K ram s 795 00 • Commodore KIM I S 159 00 

• Microproducts Super KIM s 395 00 

*Delivery on most systems is usually stock to 2 weeks. Call or write for specific information. 



16K RAM CHIP SET FOR APPLE II 
only (Tested & Burned In) *95°° 



Reference Books For apple and pet Owners 

Programming the 6502 9.95 

PET user Manual (New from Commodore) .... 9.95 

First Book of KIM 8.95 

MOS Tech Programming Manual (6502) 12.00 

MOSTech Hardware Manual 12.00 



WORKSHOPS: Call for details. 

• PET— 3rd Saturday of the Month 
• APPLE— 4th Saturday of the Month 

CLASSES: Apple Topics 

We offer a series of classes on Apple II to aquaint owners with some of the unique features and capabilities 

of their system. Topics covered are Apple Sounds, Low Res. Graphics, Hi Res. Graphics, Disk Basics, and How to Use 

Your Reference Material. Sessions are held every Thursday Night at 7:00 p.m. 



SOFTWARE 

we now have a complete software catalog. 



APPLE: 

APPLE 21 

Battlestar I 

income Tax 

super star wars 

Appietalker 

Bomber* 

Apple-Lis ner 

Talking Calculator 

Warlords 

Escape 

Tank war 

PhasorZap 

Depth Charge 

3-D Docking Mission 

Microchess 

Ron Graff s Educational Programs 



ON DISK: 

Editor/AssemDIer 

3-D Animation 

Talking Disk 

General ledger 

Check Book 

inventory System 
Text Editor 
Mailing List 
Single Disc Copy 
Memo Calendar 
Electronic index Card File - 



.9.95 
15.95 
19.95 
15.95 
S15.95 
9.95 
19.95 
12.95 
12.95 
17.95 
12.95 
15.00 
15.00 
14.95 
19.95 
(call for details) 



. 19.95 

24.95 

.19.95 

. 60.00 

. 35.00 

125.00 

50.00 

30.00 

19.95 

24,95 

19 95 



HARDWARE 



APPLE II HARDWARE: 

• Modem for Apple ll, ready to go 

Plug into telephone wall plug 



.5379.00 



'Programs by Bob Bishop 
PET: 

pet Show 

Galaxy Games 

Space Talk & Space Fight . 

Space Trek 

Finance 

Microchess . 

Casino Pac (3 Games) 

Off The Wall/Target Pong 

Mortgage 

Diet Planner/Biorythm 

Basic BASIC 



9.95 

9.95 

9.95 

9.95 

S9.95 

19.95 

995 

9.95 

1495 

1495 

14.95 



• upper & Lower case Board 

Now you can display Doth upper and lower case characters on 
your video with the Apple ll. includes assembled circuit board 
and sample software S49.95 

• Programmer Aide $50.00 

PET HARDWARE 

• Beeper $24.95 

• Petunia— for computer generated sounds $29.95 

• Video Buffer— to put your pets pictures on a television set or 

monitor $29.95 

PRINTER SPECIALS FOR APPLE AND PET 

TRENDCOM 100 with interface for Apple or PET $405.00 

40 characters per second Bidirectional look ahead printing 

Microprocessor controlled Low cost thermal paper 

96 character set 4"x 80 ft. roll S2.50 

High Reliability Clear 5x7 characters 

Quiet Operation 8 bit parallel input 

Sturdy metal/ plastic case No external power supply 

40 characters per line 

Anadex DP-8000 with tracter 

8' paper width and Apple interface $1050 

Centronics 779-2 for Apple ll 

With parallel interface $1245.00 

See if you qualify for a CCI of OC P/F Card 

and get great discounts on selected 

purchases for your Apple and PET. 



WHY SHOULD YOU BUY FROM US? 

Because we can help you solve your problems and answer your questions, we don't claim to know 
everything, but we try to help our customers to the full extent of our resources. 

—Prices subject to change. 



COMPUTER COMPONENTS OF ORANGE COUNTY 

6791 Westminster Ave., Westminster, CA 92683 714-898-8330 

Hours: Tues-Fri 11:00 AM to 8:00 PM— Sat 10:00 AM to 6:00 PM (Closed Sun, Mon) 

Master Charge, visa, B of A are accepted. No COD. Allow 2 weeks for personal check to clear. 

Add $1.50 for handling and postage. For computer systems please add $10.00 for shipping, handling and 

insurance. California residents add 6% Sales Tax. 



AN APPLE li PROGRAM EDIT AID 

Alan C.Hill 

12092 Deerhorn Dr. 

Cincinnati, OH 45240 



When editing an Apple Integer Basic program, you often want to 
locate all occurrences of a variable name, character string, or 
BASIC statements. This is usually the case when you are changing 
a variable name, moving a subroutine, etc., and you want to be 
sure you have located all references. The BASIC Edit program 
presented here should aid your editing. 

The BASIC program should be loaded into high memory and the 
program to be edited appended to it. The Edit program uses a 
machine language routine at hex 300 to 39F to search BASIC 
statements for the requested string and return the BASIC line 
number in memory locations 17 and 18. The routine is re-entered 
at 846 to find the line number of the next occurrence. This process 
is continued until no further occurrences can be found. The high 
order byte of the line number (location 18) is set to hex FF to 
indicate that the search is finished. 

BASIC Edit Program 

Note in line 32680 of the BASIC program that LIST LINE is an 
invalid BASIC statement. You will have to resort to a little 
chicanery to get the statement in. First code line 32680 as PRINT 
LINE. Then, enter the monitor and change the PRINT token ($62) 
to a LIST token ($74). This is easiest done if you code line 32680 
first and then search for the token in high memory ($3FFA when 
HIMEN is 16384). 

After coding the BASIC program and the machine language 
routine, you will then need to append the program to be edited. 
Note that the program must have line numbers less than 32600. To 
append a program, you must first "hide" the Edit program. This is 
done by moving the HIMEN pointer (202) and (203) down below 
the Edit program. Then load the edited program and reset HIMEM: 
i.e.: 

LOAD (EDIT PROGRAM) 

POKE 76, PEEK (202) 

POKE 77, PEEK (203) 

LOAD (PROGRAM TO BE EDITED) 

POKE 76,0 HIMEM MOD 256 

POKE 77,64 HIMEM/256 



You can then RUN 32600 the Edit program. Enter the character 
string or variable name to be searched when prompted by 
"FIND?". To search for a hex string (e.g. all occurrences of 
COLOR = ), enter an @ character followed by the desired hex 
character pair (@66 for the COLOR = example) 



EXAMPLES 



To find all occurrences of: 

SCORE 

XYZ 

RETURN 

DIM A 

All references to 1000 



Input 

SCORE 

XYZ 

@5B 

@4EC1 

@E803 



The Edit program will end if the screen is full ( ^18 lines). To 
continue the search for more occurrences, a RUN 32720 will return 
another page. Happy Editing! 



Find Routine 
Page Zero Memory Map 

$3-4 Address of search limit. Set to HIMEM by routine, but 

could be set lower to avoid searching Edit program. 

$6-7 Address of BASIC Token compared. Incremented until it 

exceeds Limit Address 

$8-9 Ending address - 1 of current statement being scanned 

$A-B Address of string being searched. Set up by Edit program 

$ C Length - 1 of string being searched. Set up by Edit 

program 

$11-12 Line number of statement containing the requested 
string. $12 is set to $FF if no more occurrences 



FIND ROUTINE 

A. G. HILL 
MARCH 1979 
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HILO 


* 


$0003 


HIHI 


■* 


$0004 


BSL 


* 


$0006 


BSH 


* 


$0007 


SEAL 


* 


$0008 


SEAH 


* 


$0009 


STRL 


* 


$000A 


LNL 


* 


$0011 


LNH 


* 


$0012 



HIMEM LO BYTE 
HIMEM HI BYTE 
BASIC STATEMENT L0 
BASIC STATEMENT HI 
STATEMENT ENDING ADDRESS L0 
STATEMENT ENDING ADDRESS HI 
STRING L0 
LINE NUMBER L0 
LINE NUMBER HI 
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0300 



ORG $0300 



0300 

0302 

0304 

0306 

0308 

030A 

030C 

030E 

0310 

0312 

0314 

0315 

0317 

0318 

031A 

031C 

031E 

0320 

0322 

0324 

0326 

0328- 

0329 

032B 

032D 

032F 

0331 

0334 

0336 

0338 

033A 

033C 

033F 

0342 

0344 

0346 

0348 

034A 

034C 

034E 

0350 

0352 

0354 

0356 

0358 

035A 

035D 



A5 CA 

85 06 

A5 CB 

85 07 

A5 4C 

85 03 

A5 4D 

85 04 

AO 00 

Bl 06 

38 

E9 02 

18 

65 06 

85 08 

A5 07 

69 00 

85 09 

AO 01 

Bl 06 

85 11 

C8 

Bl 06 

85 12 

A2 00 

A9 03 

20 64 03 
AO 00 
Bl 06 
Dl OA 
DO 03 
20 7F 03 
20 70 03 
90 F2 
A5 08 
C5 03 
A5 09 
E5 04 
BO 11 
A5 08 
85 06 
A5 09 
85 07 
A2 00 
A9 02 
20 64 03 
DO Bl 



START 



LENGTH 



TTOKEN 



NXTOKN 



035F A9 
0361 85 
0363 60 



FF 
12 



LIMIT 



LDA 

STA 

LDA 

STA 

LDA 

STA 

LDA 

STA 

LDYIM 

LDAIY 

SEC 

SBCIM 

CLC 

ADC 

STA 

LDA 

ADCIM 

STA 

LDYIM 

LDAIY 

STA 

INY 

LDAIY 

STA 

LDXIM 

LDAIM 

JSR 

LDYIM 

LDAIY 

CMPIY 

BNE 

JSR 

JSR 

BCC 

LDA 

CMP 

LDA 

SBC 

BCS 

LDA 

STA 

LDA 

STA 

LDXIM 

LDAIM 

JSR 

BNE 

LDAIM 

STA 

RTS 



$OOCA 

BSL 

$OOCB 

BSH 

$004C 

HILO 

$004D 

HIHI 

$00 

BSL 

$02 

BSL 

SEAL 

BSH 

$00 

SEAH 

$01 

BSL 

LNL 

BSL 

LNH 

$00 

$03 

INCPNT 

$00 

BSL 

STRL 

NXTOKN 

COMPAR 

INCTOK 

TTOKEN 

SEAL 

HILO 

SEAH 

HIHI 

LIMIT 

SEAL 

BSL 

SEAH 

BSH 

$00 

$02 

INCPNT 

LENGTH 

$FF 
LNH 



SET UP ADDRESS OF FIRST 
BASIC STATEMENT IN 
LOCS 6 AND 7 

SET UP TO STOP SEARCH 

AT HIMEM. COULD BE 

CHANGED TO LIMIT SEARCH 

AT END OF PROGRAM BEING EDITED 

GET STATEMENT LENGTH 



MINUS 2 TO POINT TO 
LAST TOKEN IN STATEMENT 

SET UP STATEMENT ENDING 
ADDRESS IN 8 AND 9 
ADD IN CARRY IF ANY 



# 



SAVE LINE NUMBER 
IN 11 AND 12 



IN 



ADJUST BSL TO POINT 
TO FIRST TOKEN 

COMPARE TOKEN TO 

FIRST CHARACTER IN 

STRING 

IF NOT EQUAL POINT TO NEXT 

IF EQUAL COMPARE REMAINING CHARS 

POINT TO NEXT TOKEN 

CARRY CLEAR THEN LOOK AT NEXT 

AT END OF STATEMENT. 

CHECK TO SEE IF AT END OF 

SEARCH LIMIT 

CARRY SET = LIMIT OF SEARCH 
SET UP BSL AND BSH TO POINT 
TO NEXT STATEMENT 



POINT TO LENGTH OF 
STATEMENT BYTE 

ALWAYS BRANCH 

SET UP LARGE LINE NUMBER 

TO INDICATE AT END OF SEARCH 

RETURN TO BASIC 
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INCPNT CLC 

ADCX BSL 

STAX BSL 

LDAX BSH 

ADCIM $00 

STAX BSH 
RTS 

INCTOK LDA BSL 

CMP SEAL 

LDA BSH 

SBC SEAH 

INC BSL 

BNE REXIT 

INC BSH 

REXIT RTS 

COMPAR LDY $000C 

COMPY LDAIY STRL 

CMPIY BSL 

BEQ COMPX 

LDYIM $00 

RTS 
COMPX DEY 

BPL COMPY 

PLA 

PLA 

RTS 



BASIC EDIT PROGRAM 

32600 DIM A$(30) 

32610 INPUT "FIND?",A$: CALL -936: 

IF A$(l,l)r'@' THEN 32630: 

KK=LEN(A$): FOR 1=1 TO KK: 

POKE 911+I,ASC(A$(I,I)): NEXT I 
32620 POKE 12,KK-1: GOTO 32650 
32630 A$=A$(2,LEN(A$)): KK=LEN(A$): 

FOR 1=1 TO KK STEP 2: 

I=ASC(A$(I,I))-176: 

33=ASC(A$(I+1,I+1))-176 
32640 IF 3>9 THEN 3=3-7: 

IF 33>9 THEN 33=33-7: 

POKE 912+1/2,3*16+33: NEXT I: 

POKE 12,KK/2-l 
32650 POKE 10,912MOD256: POKE 11,912/256 
32660 CALL 768 
32670 IF PEEK(18)>127 THEN 32730: 

LINE=PEEK(17)+PEEK(18)*256 
32680 LIST LINE 

32690 IF PEEK(37)>18 THEN 32730 
32700 CALL 846 
32710 GOTO 32670 
32720 CALL -936: GOTO 32700 
32730 END 



0364 


18 




0365 


75 


06 


0367 


95 


06 


0369 


B5 


07 


036B 


69 


00 


036D 


95 


07 


036F 


60 




0370 


A5 


06 


0372 


C5 


08 


0374 


A5 


07 


0376 


E5 


09 


0378 


E6 


06 


037A 


DO 


02 


037C 


E6 


07 


037E 


60 




037F 


A4 


OC 


0381 


Bl 


OA 


0383 


Dl 


06 


0385 


FO 


03 


0387 


AO 


00 


0389 


60 




038A 


88 




038B 


10 


F4 


038D 


68 




038E 


68 




038F 


60 





ROUTINE TO INCREMENT 

POINTERS. ENTER WITH 

XREG = DISPLACEMENT 

FROM 

BSL, BSH 

ACC = INCREMENT AMOUNT 



ROUTINE TO INCREMENT 
THE TOKEN ADDRESS BY 1 
SET CARRY IF AT END 
OF STATEMENT 



ROUTINE TO COMPARE 
REMAINING CHARACTERS 
(C) LENGTH OF CHARACTER 
STRING -1 
RESET YREG 



FOUND A MATCH! POP STACK ADDRESS 
AND RETURN TO BASIC. LINE NUMBER 
IS ALREADY IN LNL AND LNH. 



APPLE irOWNERS 

West Side Electronics introduces the 
APPLETIMETM a Red Time Clock for the Apple II 

The Appletime (Model APT-1) is a single peripheral 
board which plugs directly into any 1/0 slot on the 
Apple II. Timing is done completely in hardware (ie. 
NOT an interrupt driven clock). Thus, the Appletime 
continues to operate even when the computer is turned 
off. Our exclusive Three Way Power System keeps the 
clock running via its own AC supply, the computer's, 
or battery backup in case of power failure. Other 
features include 12/24 Hour selection, AC or crystal 
timebose, 50/60 Hz, and BCD or ASCII data format. 
Fully assembled and tested, with instructions and 

SPECIAL INTRODUCTORY PRICE 
APT-1 Real Time Clock $59.95 



Proto-board for Apple II. Over 1300 holes on 0.1 inch 
centers for designing your own circuits. 

APB-I Prototyping Board $16.95 



• * SUPU SPICI AL • • 

This month only, order the APT-1 and the APB-1 at a special 
combination price of. $69.95 



VISA 



WEST SIDE ELECTRONICS 

P.O. Box 636 

CHATSWORTH, CA. 91311 



We pay all shipping in Continental USA. 
Others add 10%; California residents add 6% tax. 



APRIL 1979 



MICRO 11:7 



^ 



ENCLOSURE 

WITH BUILT IN 

POWER SUPPLY 

SPECIFICATIONS: 

INPUT: 110/220 VAC 50/60 Hj 

OUTPUT: + 5V © 5A 

+ 24V ft 1A 
GROUNDED THREE-WIRE LINE CORD 
ON/OFF SWITCH WITH PILOT LIGHT 
Enclosure has room lor the AIM and one 
additional board: MEMORY PLUS or VIDEO PLUS 

AIM PLUS: $100"° AIM and AIM PLUS: $475°° 




\!/l|iD3^ JMte 



FOR 



AIM/SYM/KIM 




UPPER/lower case ASCII 

1 28 Additional User Programmable 

Characters: GRAPHICS- 

SYMBOLS-FOREIGN CHARACTERS 
Programmable Screen Format up to 

80 CHARACTERS - 24 LIN ES 
KEYBOARD and LIGHT PEN Interlaces 
Up to4K DISPLAY RAM 
Provision lor 2K EPROM 
Provision to add 6502 lor 

STAND-ALONE SYSTEM 

ASSEMBLED AND TESTED 

WITH 2K DISPLAY RAM 

VIDEO PLUS: $2450" 



ADD UP TO FIVE ADDITIONAL BOARDS AIM/SYM/KIM 

AUDtO/TTY CONNECTIONS "aerr 

POWER TERMINALS 
APPLICATION CONNECTORS 

FULLY BUFFERED 
FULLY DECODED 
KIM-4 Bus Structure 







MOTHER PLUS: $80°o 



FULLY ASSEMBLED AND TESTED 



AIM/SYM/KIM 
8K STATIC RAM P0 -°*„ 
Sockets for 8K Eprom 
6522 1/0 Port 

ON BOARD REGULATORS 

EPROM 
PROGRAMMER 

MEMORY PLUS: $245 00 fully assembled and tested 





©®[MPOT[^[]©T 



P.O. Box 3, So. Chelmsford, MA 01824 
617/256-3649 




SY6EX 



LEADER IN 

miCROCOmPUTER EDUCATION 



ANMHCOpON 




(-*; .*.-. 




MKKWOCBSO* 
| MTWACN6 

ncHwaK 



k*» 



AN INTRODUCTION TO PERSON- 
AL AND BUSINESS COmPUTING 

by Rodnay Zaks 
250pp,refC200 56.95 
The basic introductory text 
on microcomputers, with a 
detailed evaluation of the fea- 
tures and peripherals required 
for specific applications. No 
prior computer knowledge 
required. 

ITUCROPROCESSORS: from Chip* 
to Sy»tem» 
by Rodnay Zaks 
420pp,refC201 $9.95 

An educational text, used 
worldwide at universities and 
in industry designed to teach 
all the fundamentals of mi- 
croprocessors, the assembly 
of a system, and its use. 



miCROPROCESSOR 
INTERFACING TECHNIQUES 

Austin Lesea and Rodnay Zaks 
416pp,refC207 $11.95 

All the basic interfacing 
techniques, from keyboard to 
floppy disk, including the 
standard buses (S100 to 
1EEE488). 

miCROPROCESSOR LEXICON 
120pp,rofXl $2.95 

Dictionary and tables. All the 
definitions of the micropro- 
cessor world in a pocket 
book format. 

miCROPROGRAmmED APL 
imPLEIDENTATION 
330pp,refZlO $25.00 
How to design an APL 
interpreter. 



^S 




§ 






PROGRArTimiNG THE 6502 

by Rodnay Zaks 
320pp,refC202 $10.95 
An introductory program- 
ming text for the 6502. Does 
not require any prior pro- 
gramming knowledge. From 
arithmetic to interrupt-driven 
input-output techniques. 
6502 APPLICATIONS BOOK 
by Rodnay Zaks 
refD302 $12.95 

Actual application programs 
to interface the 6502 to 
the real world, from LED to 
motor, and analog-digital 
conversion. Available Shortly 



SELF STUDY COURSES ON 
CASSETTES 

Ten courses to study at home 
or in the car. The most time- 
efficient way to learn. Includes 
workbook and cassettes. 

INTRODUCTORY $29.95 ea 
S1- INTRODUCTION TO MI- 
CROPROCESSORS (2.5 hrs) 
S2- PROGRAMMING MICRO- 
PROCESSORS (2.5 hrs) 
COMPREHENSIVE $59.95ea 
SB1 -MICROPROCESSORS 
(12 hrs) 
SB2- MICROPROCESSOR 
PROGRAMMING (10 hrs) 
SPECIALIZED $49.95 
SB7- MICROPROCESSOR 
INTERFACING (6 hrs) 



V. 



TO ORDER 

By phone: 415848-8233, Visa, MC, 

Amer Express 
By mail: circle books on ad. Include 

payment. 
Shipping: add 65$ per book (4th class) 

or 11 .50 taster shipping (UPS). 

Double for cassettes and overseas. 
Tax: in California add tax. 

FREE DETAILED CATALOGUE 




< 



SY6EX 



2020 Milvia Street 

Berkeley, CA 94704 

Tel 415 848-8233 Telex 336311 



LIFESAVER 

byJ.Stelly 

10918 Dunvegan Wav 

Houston, TX 77013 



Is LIFE passing you by; does it progress so quickly than there is 
little time to enjoy it? Well, fear not-the LIFESAVER is here. 
Though time marches on, now you are in control. If you got "LIFE 
For Your PET" from Dr. Frank H. Covitz (The Best of Micro, p.65), 
LIFE moves along at a pretty good clip. LIFESAVER is a BASIC 
program that complements and provides some enhancements to 
Dr. Covitz machine language routines. 

LIFESAVER provides a convenient grid for setting up cellular 
patterns, permits saving and loading of patterns on the built in 
cassette unit, and gives complete control of the time interval 
between generations. You may even single step through the LIFE 
sequences. 

Commodore is supposedly mailing all owners of early model PET 
units the TIM monitor on cassette, so I will assume its availability 
in this discussion. It ain't the best monitor in the world, but it does 
allow you to load machine language programs directly from the 
cassette without any special loader routines. This does not exclude 
other methods the reader may have at his (or her) disposal if TIM is 
not available. 

A single modification to Dr. Covitz program is required before it 
can be used with LIFESAVER. Location 191 D (16) should be 
changed to read: 

191D 60 RTS 

When this change is made the program may be entered at 
190A(16) e.g. SYS(6410). If the TIM monitor is used, simply do a 
hex dump of the machine language listing and save the program 
on tape using the instructions given in the manual. 

Before loading LIFE (Dr. Covitz program) or LIFESAVER (by yours 
truly) from cassette, I recommend the following command be 
executed: 

POKE 134,0: POKE 135,24 

This lowers the BASIC boundary and prevents conflicts between 
the two programs. The regular BASIC limit can later be reinstated 
by POKE 135,32. It is also a good idea to load LIFE before 
LIFESAVER is loaded. This prevents the data pointer from getting 
initialized to the wrong location. 

It may be possible to eliminate lines 3015 and 3035 from the BASIC 
listing, if you have a relatively late model PET. These lines are 
necessary for the older units that have a problem with writing file 
headers and cassette motor start/stop control. My unit was 
delivered in Sept '78 and I was able to eliminate these lines. 

Assuming that both LIFE and LIFESAVER have successfully been 
loaded, you may begin entering your favorite cell patterns. Please 
refer to Dialog 1 (human inputs are underlined) to see how this is 
done. After the grid is printed simply press the 'RETURN' key and 
enter your pattern anywhere in the grid area using the cursor keys 
and the dot (•) symbol above the Q key. After you've created the 
desired pattern press the 'HOME' key and the 'RETURN' key in 



succession. This neat little trick returns control to the LIFESAVER 
routine without having to explicitly key in the command 'GOTO 
1000'. After the PET has saved the pattern internally the user then 
has the options to save it on tape, have the computer generate 
LIFE patterns as described in Dr. Covitz article, or scrap it and 
input a new pattern. 

The options are relisted after the execution of any LIFESAVER 
command. Examples on exercising the different options are given 
in the remaining dialogs. 

LIFESAVER should relieve the user from the tedium of having to 
manually reenter a LIFE pattern every time it is desired to run it. It 
should also^encourage the user to experiment with various L/FE 
forms, some of which are quite dazzling. 



DIALOG 1 



RUN 



LIFE 

PLEASE CHOOSE AN OPTION 

1. CREATE A PATTERN 

2. RUN LIFE GENERATOR 

3. LOAD A PATTERN FROM CASSETTE 

4. SAVE A PATTERN ON CASSETTE 

OPTION NUMBER ? j_ ( RETURN ) 

(SCREEN CLEARS, THEN ...) 
GOTO 1000 ? 






(At this point the user hits the 
RETURN key and proceeds to input a 
cell pattern.) 



GOTO 1000 ? 










READY 


• 


• 










•• 

• 


• • 










• 


•• 









(With the desired pattern on the CRT 
the user presses the HOME and RETURN 
keys to resume program execution.) 

STORING CELL PATTERN 

(After a slight delay the computer 
again responds with the option list.) 
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DIALOG 2 



DIALOG 3 



LIFE 



(Option List) 



LIFE 



(Option list) 



OPTION NUMBER ? 2 ( RETURN ) 

(Screen clears . . . ) 

HOW MANY GENERATIONS ? 1_ 
DEVELOPMENT RATE 
0: SINGLE STEP VIA (G) KEY 
1-99 .-INTERMEDIATE RATES 
100:MAX (255 GENERATION LIMIT) 

RATE ? T5_ 

(The computer proceeds to display 
generations sequentially at the 
specified rate. The larger the 
numerical value of the rate the 
faster the generations are produced. 
A rate of meanc that only one 
generation is produced at a time. 
The G key must be pressed to obtain 
subsequent generations.) 



OPTION NUMBER ? 4- 

(Screen clears ...) 

HOW MANY 

PATTERN NAME ? CHESIRECAT ( RETURN ) 

(Pattern is saved and the option 
list is printed.) 

NOTE: In the following BASIC listing 
the lower case abbreviations stand for 
cursor control keys and have the 
following meaning: 

clr = clear screen 
home = home up 
cd = cursor down 
s = space key 



LISTING 






1 


REM LIFESAVER 




2 


REM BY JAMES W. STELLY 




3 


REM POKE 135,24 BEFORE USING 


100 


DIM A$(25) 






110 


PRINT "clrLIFE": PRINT 




120 


PRINT "PLEASE CHOOSE AN OPTION:" : PRINT 


130 


PRINT "1. 


CREATE A PATTERN" 


140 


PRINT "2. 


RUN LIFE GENERATOR" 


150 


PRINT "3- 


LOAD A PATTERN 


FROM CASSETTE" 


160 


PRINT "4. 


SAVE PATTERN ON 


CASSETTE" 


170 


INPUT "OPTION NUMBER" ;N 




180 


ON N G0SUE 


200,2000,4000, 


3000 


190 


GOTO 110 








CREATE GRID FOR PATTERN INPUT 


200 


PRINT "clr 


cd"; 




210 


FOR 1=1 TO 


5 




220 


PRINT "l" 


T""~r — r — r- 


~~i 1 1 r~ 


230 


PRINT " 






240 


PRINT " 






250 


PRINT ": 






260 


NEXT I 






270 


PRINT "T 


"I 1 1 r- 


— i 1 1 1 


280 


PRINT " 






290 


PRINT " 






300 
310 


PRTNT "J 


L L L L 


__! 1 | 1 


INPUT "home GOTO 1000" ;A$ 
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STORE PATTERN 

1000 PRINT "homeSTORING CELL PATTERN" 

1010 FOR 1=1 TO 24:A$(I)="":NEXT I 

1020 FOR 1=1 TO 24: FOR J=1 TO 39 

1030 IF PEEK(32767+J+(I*40))=81 THEN A$(I)=A$(I)+ n t n :GOT0 1050 

1040 A$(I)=A$(I)+"- M 
1050 NEXT J: NEXT I 
1060 RETURN 

ACCESS LIFE GENERATOR 

2000 INPUT "clrHOW MANY GENERATIONS" ;G 

2010 PRINT "cdDEVELOPEMENT RATE:":PRINT 

2020 PRINT "0; SINGLE STEP VIA (G) KEY" 

2030 PRINT "1-99 INTERMEDIATE RATES" 

2040 PRINT "100:MAX (255 GENERATIONS LIMIT)" 

2050 INPUT "cdRATE";S 

2060 PRINT "clrGEN 0" 

2070 FOR 1=1 TO 23:PRINT A$(I) : NEXT I 

2075 PRINT A$(I);:F0R 1=1 TO 2000: NEXT I 

2080 IF S=100 THEN POKE 6483 ,256~G:SYS(6410) :GOTO 2140 

INTERMEDIATE RATES 

2100 POKE 6483, 255: IF S=0 GOTO 21 60 
2110 S=100-S:FOR 1=1 TO G 
2120 SYS( 6410): PRINT "homeGEN";I 
2130 FOR J=1 TO S«30:NEXT J:NEXT I 
2140 GET A$:IF A$<>"X" GOTO 2140 
2150 RETURN 

SINGLE STEP 

2160 G=1 

2170 SYS( 6410): PRINT "homeGEN";G 
2180 GET A$: IF A$="X" THEN RETURN 
2190 IF A$="G" THEN G=G+1 : GOTO 2170 
220 GOTO 2180 

SAVE PATTERN 

3000 INPUT "clr PATTERN NAME";A$ 

3010 OPEN 1 , 1 , 1 ,A$ 

3015 POKE 243,122:P0KE 244,2 

3020 FOR 1=1 TO 24 

3030 PRINT#1,A$(I) 

3035 POKE 59411,53 

3040 NEXT I 

3050 CLOSE 1: RETURN 

LOAD PATTERN 

4000 INPUT "clrPATTERN NAME";A$ 

4010 OPEN 1,1,0,A$ 

4020 FOR 1=1 TO 24:INPUT#1 ,A$(I) :NEXT I 

4030 CLOSE 1: RETURN 
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CORRECTED KIM FORMAT LOADER FOR SYM-1 

Nicholas J. Vrtis 

5863PinetreeS.E. 

Kentwood, Ml 49508 



My cassette is an old model CE, and it won't quite hack the high 
speed tape format of the SYM-1, so I have probably used the KIM 
format option more than most SYM owners. In the process, I have 
found a bug in the SYM monitor tape load routine. Synertek 
knows about the problem, but didn't have a nice fix when I called, 
so I worked up the attached program. 

The problem with the monitor routines is that they will not load a 
slash (hex 2F) from a KIM format tape. The slash is used to indicate 
that the data is done, and the checksum follows. The monitor 
routines don't check for the slash until after the KIM characters 
have been read and combined. The error you get is a checksum 
error (ER CC). 

Most of the code for this program has been copied from the SYM 
monitor routines, except these work. The basic logic change is that 
when a slash is read as a single KIM byte, it-is treated as a non-hex 



character. The non-hex routine checks for the slash instead of after 
every character. If it is a slash, it goes to the checksum check 
routine. 

This routine is not as fancy as the monitor routines, but it sure 
beats re-keying a couple K bytes of program. It has turned out to 
be convenient to have this program available even for loading 
programs without the slash. By changing the branch after the 
compare for the slash to a branch back to LOADT7 it will ignore 
errors. Sometimes this will load a bad tape with only minor errors. 
Other times the program gets out of sync and loads garbage. It is 
worth the try for a tape you have spent a lot of time on. 

One final comment about cassettes. If you have the remote 
control connected, putting a hex CC into location AOOC will turn 
the cassette motor back on. It is easier than yanking the remote 
plug. 



P L " I 1 QV Introductory Special 



Includes software . . 
and sound package 



s 795, 



KIM-1 161 

SYM 238, 



rrj CIO Power Supply with KIM or SfM g «/% Art 

JSJLO 1 Z tor KIM. SfM and extra memory . OU.UU 

VK 4QD Problem Solver Systems 1 /l r~> /*Y"l 

iSJVlOD 8K Static RAM tor KIM. SYM, AIM i^Sr.UU 

KIM-4 Motherboard 95.00 

Memory Plus - the Computerist 

8K RAM. sockets tor 8K EPROM. nOQ DT\ 

EPROM Programmer, timers, and I/O . ZOO .UU 

Enclosures from Enclosure Group 

SYM . s 36.00 

KIM 23.00 

SS? h Horizon 2 KSJ $1649. 



CASSETTE TAPES 

Premium quality, low noise in 5 screw housing with labels 
ALL TARS OtUUUUfRBD 





10 


50 


100 


C-10 


5.95 


26.00 


48.00 


C-30 


7.00 


31.00 


57.00 



Norelco hinged hard boxes 10/1 .25 
Soft poly plastic boxes 1 0/ 1 .00 



2716 EPROM (Intel +5 Volt) •38.00 

21 14L 450ns 4K Static RAM 6.05 

Programming a Microcomputer: 

6502 Poster 8.95 

6500 Programming Manual 6.50 

6500 Hardware Manual 6.50 

First Book of KIM 9.00 

Microcomputer Programming- 

6502 R. Zaks 9.00 



N -PET 16K $ 995 
PET 32K $1195 

special includes software and sound paokage 



Write for list of 6502 and S-100 products 

A B Computers 



P.O. Box 104 
Perkasie, PA 18944 
(215) 257-8195 
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FIXED SYM-1 KIM FORMAT LOADER 



NICHOLAS J 
MARCH 1979 



VRTIS 



• 



0080 
0080 
0080 
0080 



0080 
0080 
0080 

0080 
0080 
0080 
0080 
0080 
0080 
0080 
0080 
0080 
0080 

0000 

0000 0.0 



0001 
0004 
0006 
0009 
OOOC 
OOOE 
0011 
0013 
0016 
0018 
001B 
001E 
0021 
0023 
0025 
0027 
0029 



20 
AO 
20 
AD 
29 
8D 
A9 
8D 
A9 
8D 
20 
20 
C9 
FO 
C9 
DO 
FO 



A6 
00 
B6 
02 
BF 
02 
00 
OB 
AE 
04 
82 
61 
2A 
06 
16 
F2 
F3 



AO 
8D 
8E 



STRIPPED DOWN VERSIONS OF LI COMMAND. 
WILL LOAD A 2F WHICH CAUSES SYM-1 TROUBLE 
ONLY FOR KIM FORMAT TAPES. 
ID SHOULD BE PUT INTO LOCATION 0000. 



CHAR ASSEMBLY & DISASSEMBLY 
CURRENT CHAR INDIRECT ADDRESS 



CHAR 


* 


$OOFC 


MODE 


* 


$OOFD 


BUFADL 


* 


$OOFE 


BUFADH 


# 


$OOFF 


SYM-1 1 


REFERENCES 


DDRIN 


* 


$A002 


VIAACR 


* 


$AOOB 


LATCHL 


* 


$A004 


ACCESS 


* 


$8BA6 


SLASH 


* 


$8D3C 


LOADTX 


* 


$8D4F 


NHERR 


* 


$8D69 


SYNC 


* 


$8D82 


START 


* 


$8DB6 


RDBYTX 


* 


$8E28 


PACKT 


* 


$8E3E 


RDCHT 


* 


$8E61 


CHKT 


* 


$8E78 



SLASH IN SYM MONITOR 



ID 

8B LOADT 

8D 
AO 

AO 

AO 



LOADTA 
LOADTB 



ORG 



JSR 

LDYIM 

3SR 

LDA 

ANDIM 

STA 

LDAIM 

STA 

LDAIM 

STA 

JSR 

JSR 

CMPIM 

BEQ 

CMPIM 

BNE 

BEQ 



$0000 

$00 RESERVED FOR PROGRAM ID 



ACCESS 

$00 

START 

DDRIN 

$BF 

DDRIN 

$00 

VIAACR 

$AE 

LATCHL 

SYNC 

RDCHT 

LOADTC 
$16 

LOADTA 
LOADTB 



UN-PROTECT SYSTEM 
SET KIM MODE 
INITIALIZE 



RAM 



BIT 6 = INPUT IS PB6 



SET UP CLOCK FOR GETTR (KIM) 
STORE GETTR VALUE IN LO LATCH 
GET IN SYNC 



START OF DATA ? 



NO - SYNC CHARACTER? 
IF NOT, RESTART SYNC 
IF YES, KEEP LOOKINT 



SEARCH 
FOR THE 
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002B A9 00 
002D 85 FD 



LOADTC LDAIM $00 
STA MODE 



CLEAR "NOT IN SYNC BIT" 



002F 20 28 8E 



3SR 



RDBYTX READ ID BYTE 



CHANGE THE FOLLOWING 
NOT HEX 0000 



IF ID LOCATION IS 



0032 


C5 


00 




CMP 


ID 


0034 


FO 


02 




BEQ 


LOADTD 


0036 


DO 


E3 




BNE 


LOADTA 


0038 


20 


28 


8E 


LOADTD JSR 


RDBYTX 


00 3 B 


20 


78 


8E 


JSR 


CHKT 


003E 


85 


FE 




STA 


BUFADL 


0040 


20 


28 


8E 


JSR 


RDBYTX 


0043 


20 


78 


8E 


JSR 


CHKT 


0046 


85 


FF 




STA 


BUFADH 



COMPARE WITH REQUESTED 
GO LOAD IF EQUAL 
UNCONDITIONAL - RESTART 

GET SAL FROM TAPE 

PUT IN BUF START LOW 
SAME FOR SAH 



ID 



SEARCH 



THE FOLLOWING JSR RDBYT IS THE ONLY 
INSTRUCTION THAT WOULD HAVE TO CHANGE 
TO RE-LOCATE THIS PROGRAM 



0048 


20 


67 


00 


LOADTE 


JSR 


RDBYT 


004B 


BO 


OF 






BCS 


XNHERR 


004D 


20 


78 


8E 




OSR 


CHKT 


0050 


AO 


00 






LDYIM 


$00 


0052 


91 


FE 






STAIY 


BUFADL 


0054 


E6 


FE 






INC 


BUFADL 


0056 


DO 


FO 






BNE 


LOADTE 


0058 


E6 


FF 






INC 


BUFADH 


005A 


DO 


EC 






BNE 


LOADTE 


005C 


CD 


3C 


8D 


XNHERR 


CMP 


SLASH 


005F 


DO 


03 






BNE 


YNHERR 


0061 


4C 


4F 


8D 




JMP 


LOADTX 


0064 


4C 


69 


8D 


YNHERR 


OMP 


NHERR 


0067 


20 


61 


8E 


RDBYT 


JSR 


RDCHT 


006A 


CD 


3C 


8D 




CMP 


SLASH 


006D 


DO 


02 






BNE 


RDBYTA 


006F 


38 








SEC 




0070 


60 








RTS 




0071 


20 


3E 


8E 


RDBYTA 


JSR 


PACKT 


0074 


90 


01 






BCC 


RDBYTB 


0076 


60 








RTS 




0077 


AA 






RDBYTB 


TAX 




0078 


20 


61 


8E 




JSR 


RDCHT 


007B 


86 


FC 






STX 


CHAR 


007D 


4C 


3E 


8E 




3MP 


PACKT 



GET A BYTE INPUT 
BRANCH IF NON-HEX 
INCLUDE IN CHECKSUM 
STORE BYTE 

BUMP BUFFER ADDRESS 
BRANCH IF NO CARRY 
ELSE NEED TO UPDATE 
UNCONDITIONAL 



♦) i 



HIGH ORDER 



"/" IN SYM MONITOR 
WAS IT REALLY AN ERROR 
NOW LET HIM HANDLE CHECKSUM 
LET MONITOR DO THIS ALSO 

READ ONE HALF 

SEE IF A SLASH 

BRANCH IF NOT 

SET CARRY AS NON-HEX 

AND RETURN 

SEE IF GOOD CHARACTER 
BRANCH AROUND RETURN IF HEX 



SAVE MSD 
GET NEXT HALF 
SAVE IT HERE 
CHECK FOR HEX 



CHARACTER 



& RETURN 



♦ I 
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A CLOSE LOOK AT THE SUPERBOARD If 



• 



Bruce Hoyt, Pastor 

Sharon Assoc iated Reformed Presbyterian Church 

Route 1 

Rrighton.TN 38011 



Late in December 1978 my dreams came true. Those dreams I had 
had in the mid 60's when I first learned how to program computers. 
I had dreamed of having my own desk-sized computer. That 
dream has come true to a degree I would not have thought 
possible then. The computer I now have is not desk-sized but is 
contained on one printed circuit board. Furthermore it is more 
powerful than the big monsters I worked on in the mid 60's. 
I don't want to bore you with a description of my continual 
amazement at a computer on a chip for such things are now old 
hat. Nor do I want to give just a general overview of the 
Superboard II manufactured by Ohio Scientific. For a general 
description you may check the March 1979 issue of Popular 
Electronics, p.76. I want to go somewhat deeper into evaluating 
and describing the Superboard II (Note: the Challenger IP also 
manufactured by Ohio Scientific is the same computer in a case 
with power supply). 

HARDWARE 
KEYBOARD: 

The keyboard is mounted directly on the printed circuit board as 
can be seen in the advertisements. It is a polled keyboard which is 
polled by writing to a latch addressed at memory location! DF00. 
This latch feeds the rows of the keyboard matrix. When a key is 
depressed the latch signal is fed through the key switch to a 
tri-state buffer and back onto the data buss. A read of address 
DF00 will pick up the signal from the column in which the key is 
depressed. This method of polling the keyboard makes the 
hardware very simple (and cheap) but it is effective. In my view a 
polled keyboard like the one on the Superboard II is better than a 
hardware implemented ASCII keyboard. Several nice features can 
be incorporated this way. For example every key has an automatic 
repeat feature. You have direct access to every key on the board 
for gaming purposes. Another keyboard can be put in parallel with 
the existing one. I plan to add a Hex keypad this way. OSI has 
provided a jack with several of the keyboard lines on it so that 
switch type joysticks may be connected for games. 
For ordinary ASCII input from the keyboard the monitor includes a 
subroutine which returns the ASCII value of any key depressed. So 
for all practical purposes this arrangement works just like any 
other ASCII keyboard. 

OSI has fed the signal from the keyboard through a resistor 
network and then out the game jack. This signal may be 
connected to a speaker to make sounds or music. The only reason 
I cannot give a further description of this feature is that OSI failed 
to include the resistors and I haven't yet gotten around to it. 
VIDEO DISPLAY: 

The video display is elegant and simple from a hardware point of 
view. The display on the screen is 32 by 32 but has no guard 
bands. My monitor displays about 27 by 30 screen size. The 
software supplied with the Superboard uses only 24 character lines 
since many who buy the Superboard may want to connect it to an 
ordinary TV through a video modulator. The video display is 
refreshed from a IK memory located at D000-D3FF. Any byte 
written into this memory gets fed through a character generator 
and then sent to the screen. The character generator produces not 
only the full set of ASCII symbols but also more than 100 graphics 
symbols. It is complete enough to do just about anything you 
would want to on a 24 by 24 screen: Life, Tic-Tac-Toe, Pong, 
Racecar, Ship-tank-airplane warfare, etc. 



You may wonder about the access to the refresh memory since 
both the CPU and the video disply circuitry must use it. The video 
display memory is accessed through a multiplexer which is 
normally connected to the refresh circuitry. This multiplexer 
allows the CPU to access the memory whenever the CPU addresses 
any memory from DOOOto D3FF, This causes a slight blink in the 
display on the TV monitor but the blink is almost unnoticable. 
Even constantly writing to the display memory causes only a slight 
decrease in brightness and some flicker of the picture. But 
whoever writes constantly to the display memory anyway? There is 
no affect at all on the monitor when the CPU is accessing memory 
other than the video memory. 
CASSETTE I/O: 

The Superboard comes with a KC standard cassette interface built 
in. This operates at 300 baud. That is somewhat slow for loading 
long programs but the slowness is compensated for by the 
accuracy. I have yet to find a read error. The hardware for the 
interface uses a Motorola 6850 ACIA to generate serial data. I 
think that a small change in the clock used for this ACIA could 
speed up operation but I have not checked this out yet. This 6850 
is located at FOOOFOOI in the memory space. 
The greatest difficulty with the cassette interface is that no 
provision has been made for motor control. It would have been 
simple to use the Request-to-Send output from the 6850 for this 
purpose. I plan to connect the Request-to-Send output to a small 
reed relay for this purpose 
COMPONENTS: 

The board itself is high quality epoxy-glass. It is double sided, 
through the hole plated The CPU is a 6502A and so has plenty of 
reserve. The RAM chips and other support are mostly low power 
variety. All have recent date codes. The character generator and 
the BASIC ROM's are masked programmed type but the monitor is 
an EPROM. I suppose you could reprogram the Monitor to suit 
some particular need you might have. The schematics are 
accurate and clear. They are very easy to follow since this 
computer is not really very complicated. The only complaint I 
would have is that various sections of the schematic are not 
labelled as to their funtion. But with a little study you can figure 
them out. 

FUTURE EXPANSION: 

An empty 40 pin DIP socket is provided for expansion. All the 
important control, address, and data lines are connected to this 
DIP socket. OSI makes a model 610 expansion board which 
connects to this DIP socket. The 610 expansion board comes with 
a timer, printer interface, and disk interface along with room for 
more memory. I personally plan to go from this DIP socket to a 
KIM type connector for interfacing but there are many possibilities 
for expansion including the S-100 bus or OSI's 48 pin bus. 

SOFTWARE 
MONITOR: 

The monitor comes in an EPROM at the high end of memory and 
contains the interrupt vectors, the keyboard input routine, cassette 
I/O routines, and a memory access routine which allows you to 
view or change any memory location. With this capability it is 
very easy to load mchine language programs by hand and then 
execute them or save them and later load them from tape. One 
deficiency is the lack of a cassette save routine in the monitor. 
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The monitor has a load routine but no save routine. I have written 
a save routine which incorporates a Hex memory dump. (See 
figure 1) This routine saves data in a format acceptable to the 
monitor load routine. I have located it at 0222 since this space is 
unused by the BASIC interpreter. The begin address and the end 
address of the code to be saved must be entered at 00F7 and 00F9 
respectively. When you execute the save routine, be sure to turn 
on your recorder! The code will be saved on tape as well as 
displayed on the monitor screen. If you want to use this program 
as a memory dump just run it without turning on your cassette. 
Several important monitor routines as well as some Basic routines 
are listed in Table 1. 
BASIC: 

The BASIC in ROM is an 8K Microsoft product. It is called a 6 digit 
BASIC since only 6 digits of precision are displayed. Internally, 
however, all numbers are carried in floating point form with 23 bits 
of precision (actually the precision is 24 bits since a high order 1 
bit is assumed). That amounts to 7Vi digits of precision internally. 
Though this BASIC is very good and very fast it is still a BASIC 
interpreter and allowance must be made for that fact. I have a 
puzzle that I have programmed in both BASIC and machine 
lannimn<\ The m<i< nine language program takes about V/i hours to 
run tr> completion. The RASIC program would take over a month! 
Superboard is what OSI calls its "immediate mode." That means 
that any statement can be entered without a line number and it 
will be executed immediately. Since "?" can be used in place of 
"PRINT" it is possible to interrogate the computer for any piece of • 
information you might want. For example ? A yields thevalue of 
the variable A in the memory. ? 45-20 yields 25. ? PEEK (255) yields 
the contents of memory location 255 in decimal. GOTO 40 sends 
BASIC to statement number 40 and begins execution at that point. 
This last feature is very useful in debugging. One could say that the 
immediate mode allows you to use the Superboard as a 
super-calculator and provides a built-in debugger. The BASIC 
alone is worth the price of the computer. 



ASSEMBLER: 

There is one available from OSI on tape but I haven't tried it out. I 
want to write my own and put it in an EPROM. 
DOCUMENTATION: 

A few words must be said about documentation. Frankly, it is not 
up to OSI's high quality in the hardware and software areas. The 
graphics manual is by far the best, providing pretty clear 
descriptions and giving good examples. The users manual leaves 
something to be desired in clarity. It is too brief and rather vague 
at points. I have had real trouble trying to use machine language 
since there is virtually no description of the machine instructions. I 
also had some trouble figuring out what pins to connect my 
cassette to since the diagram is not clearly labelled. The BASIC 
manual is very brief-admittedly so. OSI expects you to have on 
hand a RASIC reference manual if you are not thoroughly familiar 
with the workings of BASIC. One serious problem is an error in the 
BASIC manual relating to the USR function. It tells you to poke 
the starting address of the USR routine into locations 023E-023F 
but this does not work. In the graphics manual there is an example 
of the use of the USR function. In that example the starting 
address of the USR routine is poked into OOOB-OOOC. This works. 
I do wish that manufacturers would supply complete 
documentation with their software including source code. OSI 
provides almost nothing in the way of description for either the 
monitor or BASIC. I have disassembled the monitor and figured it 
out but have not yet started on BASIC. If anyone has inside 
information on the inner workings of Superboard BASIC please let 
us know. Think of all those good routines in BASIC that we could 
use to memory saving advantage: conversion routines, arithmetic 
routines, text editor, scanner, etc. 

Though I have had to give a few negatives about the Superboard II 
I am well impressed with the quality of both hardware and 
software. I f you are undecided as to what computer is the best buy 
for the money, I urge you to send your $279 check to OSI and ask 
for a Superboard. I don't think there is anything as good for the 
price on the market. 



PRESENTS SOFTWARE AND HARDWARE FOR YOUR APPLE 



SOFTWARE: 



• Hires Games • 

Missile — Anti — Missile 
Star Wars 
Rocket Pilor 
Saucer Invasion 
Space Maze 



• Other Program • 

By T. David Moteless Curve Fit 

Sales Forecasting 
Morse Code 
Calendar 
By Robert J. Bishop Polar Coordinate Plot(Hires) 



by Dave Garson 
by Neil Lipson 

by Ed Handley 
By David Moteles 



Programs Require 16K rams and rom board 



All Programs $9.95 EACH 



HARDWARE 

Neil Upson's Original Light Pen Includes 
5 Programs 



$34.95 



SEND Check or M.O. to P.O. Box 273, Ply. Mtg., PA 19462 

Programs Accepted for Publicaton - Highest Royalty Paid 



Postage and Handling— Add $1.00 for first item them 50 c for each add'l 
MICRO 11:16 



PA Residents Add 6% Sales Tax 
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OSI CASSETTE SAVE/HEX MEMORY DUMP 



0222 



BRUCE 
MARCH 



HOYT 
1979 



TO USE, PLACE THE START ADDRESS OF CODE 
TO BE SAVED IN 00F7,00F8 AND THEN THE END 
ADDRESS IN 00F9,00FA. TURN ON THE TAPE 
RECORDER AND EXECUTE. NOTE: THIS PROGRAM 
WILL SAVE ITSELF ON TAPE. 

ORG $0222 



0222 


A9 


OD 


START 


LDAIM 


$0D 


CARRIAGE 


RETURN 


0224 


20 


2D 


BF 


JSR 


$BF2D 


CRT 




0227 


20 


7A 


FF 


GSR 


$FF7A 


10 NULLS 


TO CASSETTE 


022A 


A9 


2E 




LDAIM 


$2E 


"." ADDRESS MODE 


022C 


20 


75 


02 


JSR 


CC 






022F 


A5 


F8 




LDA 


$00F8 


FROM LOCATION (HIGH) 


0231 


20 


63 


02 


JSR 


AOUT 






0234 


A5 


F7 




LDA 


$00F7 


FROM LOCATION (LOW) 


0236 


20 


63 


02 


JSR 


AOUT 






0239 


A9 


2F 




LDAIM 


$2F 


"/" DATA 


MODE 


023B 


20 


75 


02 


JSR 


CC 






023E 


A2 


00 


LOOP 


LDXIM 


$00 






0240 


Al 


F7 




LDAIX 


$00F7 


GET BYTE 




0242 


20 


63 


02 


JSR 


AOUT 


OUTPUT 




0245 


A9 


OD 




LDAIM 


$0D 


CARRIAGE 


RETURN 


0247 


20 


Bl 


FC 


JSR 


$FCB1 


CASSETTE 


OUTPUT 


024A 


A9 


20 




LDAIM 


$20 


SPACE 




024C 


20 


2D 


BF 


JSR 


$BF2D 


CRT 




024F 


E6 


F7 




INC 


$00F7 


INCREMENT FROM ADDRESS 


0251 


DO 


02 




BNE 


BUMP 






0253 


E6 


F8 




INC 


$00F8 






0255 


38 




BUMP 


SEC 




CHECK IF 


DONE 


0256 


A5 


F9 




LDA 


$00F9 


TO 




0258 


E5 


F7 




SBCZ 


$00F7 


FROM 




025A 


A5 


FA 




LDA 


$ F A 


TO + 1 




025C 


E5 


F8 




SBCZ 


$00F8 


FROM + 1 




025E 


10 


DE 




BPL 


LOOP 






0260 


4C 


43 


FE 


JMP 


$FE43 


YES, RETURN TO MONITOR 



0263 
0265 
0268 
026B 
026E 
0271 
0274 



85 
20 
AD 
20 
AD 
20 
60 



0275 20 
0278 20 
027B 60 



FC 
AC 
CC 
75 
CD 
75 



Bl 
2D 



AOUT 



FE 
DO 
02 
DO 
02 



FC 
BF 



STA 
JSR 
LDA 
JSR 
LDA 
JSR 
RTS 

JSR 
JSR 
RTS 



$OOFC 

$FEAC 

$DOCC 

CC 

$DOCD 

CC 



$FCB1 
$BF2D 



USE MONITOR DISPLAY 

TO UNPACK 

HI 

LO 



OUTPUT TO CASSETTE 
AND CRT 



Figure 1 
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Page Usage 



0000 
00FB 
OOFC 
OOFE-OOFF 

Page 1 

0100-0140 

0130 

01C0 

Page 2 

0200 
0203 
0205 
0206 
0212 
0218 
021A 
021C 
021e 
0220 
0222-02FA 



JMP to warm start in BASIC 
cassette/keyboard flag for monitor 
data temporary hold for monitor 
address temporary hold for monitor 



stack 

NMI vector - NMI interrupt causes a jump to this point 

IRQ vector 



cursor position 

load flag 

save flag 

CRT simulator baud rate - varies from = fast to FF = slow 

Control-C flag 

input vector = FFBA 

output vector = FF69 

Control C check vector ■ FF9B 

load vector = FF8B 

save vector = FF96 

unused 



Page 3 and up to end of RAM is BASIC workspace 

A000-BFFF BASIC in ROM 

D000-D3FF Video refresh memory 

DF00 Polled keyboard 

F000-F001 Cassette port 6850 

F800-FFFF Monitor EPROM 

FC00 Floppy bootstrap 

FD00 Keyboard input routine 

FE00 Monitor 

FF00 BASIC I/O support 

Useful Subroutine entry points 



) !< 



A274 
BD11 
BF2D 
FD00 
FCB1 
FE00 
FE0C 
FE43 
FE80 
FE93 
FF69 



FF00 
FF8B 
FF96 
FF9B 
FFBA 



warm start for BASIC 

cold start for BASIC 

CRT simulator - prints char in A register 

input char from keyboard, result in A 

output 1 byte from A to cassette 

entry to monitor, clears screen, resets AC I A 

entry to monitor, bypasses stack initialization 

entry to address mode of monitor 

input ASCII char from cassette, result in A, 7 bit cleared 

convert ASCII hex to binary, result in A, -80 if bad 

BASIC output to cassette routine, outputs one char 

to cassette, displays on screen, outputs 10 nulls 

if carriage return character 
Reset entry point 
Load flag routine 
Save flag routine 
Control-C routine 
BASIC input routine 



Table 1. 
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EKIM OR MAXI-KIM 
Extended Keyboard Input Monitor 

Andrew V.W. Sensicle 

155 Valois Bay Ave. 

Pointe Claire, Montreal 

Quebec, Canada H9R 4B8 



Although KIM-Ts ROM contains useful features like the tape and 
TTY input-output routines, when it comes to inputting data or 
coding via the key pad, KIM's resident monitor leaves much to be 
desired, for example the avoidance of repetitive pushing of the "t" 
between each entry or the ability to look back a few bytes without 
going into address mode. I would like to thank Jim Butterfield for 
his excellent BROWSE and BRANCH PROGRAMS which I put 
together in Page 1 and have used religiously since I got started in 
this game in. mid 78. 

However, these have their limitations and I have frequently found 
the need for a little more sophistication, not to mention the space 
thry occupy in Page 1- Anyway the thing which irritated me most 
was the need to re-enter a long listing merely in order to open up a 
few spaces for additional instructions. The process of tidying up a 
finished program, entailing closing up unwanted spaces and the 
associated readdressing was also very time consuming. 

thus decided to try to write an extended monitor which would be 
compact enough to fit in Page 17 and yet provide the functions I 
needed. After much condensing and compressing I ended up with 
a program 6 bytes longer than the "legal" Page 17 RAM, but by 
stealing a little from KIM it fits nicely. KIM doesn't seem to mind. 
As long as you don't use the tape or TTY routines, he leaves you 
alone. 

The NMI vector is loaded with the start address (1780) so that the 
ST key can be used to access the monitor at any open cell address. 
Before pressing ST or after exitting via RS the resident monitor is 
used as a normal in the AD mode. The ST key gives you 6 other 
modes of operation or functions. 



1. STAND BY MODE [ST]: This starts the program which then sits 
looking at the open cell address and its contents, ie. nothing-seems 
to happen. However, any HEX key is stored at the open cell address 
which each second key stroke increments the address. 

2. INCREMENT [t): Big deal! This works just like normal. 

3. DECREMENT [PC]: This steps the address points backwards 
exactly the reverse of "t". 

4. OPEN UP MODE [AD]: Each depression of this key causes one 
full page of bytes (FF) to be moved one place up starting at the 
open cell address. 

5. CLOSE UP MODE [DA]: Each depression of this key causes one 
full page of bytes to be moved one place back to overwrite the 
open cell contents. Having made an "open up" or close up move 
of one or more steps you will, of course, have to fix up all affected 
addresses. This is not as onerous as it sounds if you use the sixth 
mode. 

6. BRANCH MODE [GO]: When a branch instruction is en- 
countered while entering a new program or fixing up an old one, 
all you need do is press "CO" followed by the actual destinction 
address (low order only). The monitor will calculate the relative 
address, store it in the open cell and step on to the next cell all in 
the twinkling of an eye. The user is, as usual, responsible for 
ensuring that the branch does not exceed the normal half page 
range. 

I hope that this little program will be as useful to others as it is and 
has been to me. 



ORG $1780 



1780 D8 

1781 A2 01 
1783 86 FF 
17e5 86 FD 



MODE 


* 


$00FF 




TEMPX 


* 


$00FD 




LAST 


* 


$00F3 




INL 


* 


$00F8 




POINTL 


* 


$00FA 




POINTH 


* 


$00FB 




SCAND 


* 


$1F19 




GETKEY 


* 


$1F6A 




UPDATE 


* 


$1FBB 




INCPT 


* 


$1F63 




START 


CLD 








LDXIM 


$01 


INITIATE 




STX 


MODE 


COUNTER 




STX 


TEMPX 





MODE AND 
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1787 
178A 
178D 
178F 
1791 
1793 
1795 
1797 
1799 
179B 
179D 
179F 
17A1 
17A3 
17A5 
17A7 

17A9 
17AB 
17AC 
17AE 
17AF 
17B1 
17B2 
17B4 

17B6 
17B8 
17BA 
17BB 
17BD 
^17BE 
17BF 
17C1 

17C3 
17C5 
17C7 
17C9 
17CB 
17CD 

17CF 
17D1 
17D3 
17D6 
17D8 
17DA 
17DC 
17DE 
17E0 
17E2 
17E3 
17E5 
17E7 
17EA 



20 
20 
C5 
F0 
85 
C9 
DO 
C6 
C9 
FO 
C9 
FO 
C9 
FO 
C9 
DO 



Bl 
C8 
91 
88 
DO 
FO 

AO 
Bl 
88 
91 
C8 
C8 
DO 
FO 

C6 
A5 
C9 
DO 
C6 
10 

C9 
BO 
20 
A5 
91 
C6 
FO 
A4 
DO 
18 
E5 
91 
20 
4C 



19 
6A 
F3 
F6 
F3 
13 
02 
FF 
12 
4A 
14 
22 
11 
11 
10 
26 



IF 
IF 



GETK 



AO FF 



FA 

FA 

F7 
CA 

01 
FA 

FA 



F7 
BD 

FA 
FA 
FF 
B5 
FB 
Bl 

10 
AD 
BB 
F8 
FA 
FD 
A9 
FF 
05 

FA 
FA 
63 
80 



IF 



SKIP 



JSR 

JSR 

CMP 

BEO 

STA 

CMPIM 

BNE 

DEC 

CMPIM 

BEQ 

CMPIM 

BEQ 

CMPIM 

BEQ 

CMPIM 

BNE 



SCAND 

GETKEY 

LAST 

GETK 

LAST 

$13 

SKIP 

MODE 

$12 

INCPNT 

$14 

DECPNT 

$11 

CLOSUP 

$10 

INDATA 



LIGHT 
CHECK 



DISPLAY 
KEYS 



NEW KEY 
GO ? 



r < 



IN BRANCH MODE 



PUT 
+ ? 

PC ? 

DA ? 

AD ? 



LOAD 255(10) 



OPENUP LDYIM $FF 
OPENX DEY 

LDAIY POINTL LOAD AND STORE 

INY ONE CELL HIGHER 

STAIY POINTL 

DEY 

BNE OPENX NEXT 

BEQ START 

CLOSUP LDYIM $01 

CLOSY LDAIY POINTL LOAD OPEN CELL 

DEY PLUS 1 

STAIY POINTL STORE IN OPEN CELL 

INY THEN UP 

INY UNTIL 

BNE CLOSY 

BEO START CONE 255 (10) 



DECPNT 



DEC 

LDA 

CMPIM 

BNE 

DEC 

BPL 



POINTL 

POINTL 

$FF 

START 

POINTH 



PAGE 

NO 

YES, 



CHANGE? 



THEN DEC POINTH 



START AS WELL 



INDATA CMPIM $10 



BCS 

JSR 

LDA 

STAIY 

DEC 

BEQ 

LDY 

BNE 

CLC 

SBC 

STAIY 



FALSE START ACTUALLY NO KEY 
ROL 4 BITS FROM A TO INL 



IF 
17 



INCPNT 3SR 
JMP 



START 

UPDATE 

INL 

POINTL 

TEMPX 

GETK 

MODE 

INCPNT 

POINTL 

POINTL 

INCPT NEW CELL 

START RETURN 



ONE MORE KEY 

IN BRANCH MODE? 

NO 

CALC RELATIVE ADDRESS 
STORA IT IN OPEN CELL 
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A CASSETTE OPERATING SYSTEM FOR THE APPLE II 

Robert A. Stein, jr. 

2441 Rolling View Dr. 

Dayton, OH 45431 



Have you ever wished that as great as the Apple II computer 
system is that you were able load programs by name from a library 
cassette? Well, with this mini-sized cassette operating system you 
can stack many programs on one cassette and load the one you 
want by typing in its name. Great for showing off your system 
without juggling a dozen or so cassette tapes. 

The Cassette Operating System [CASSOS] resides in memory at 
locations 02C0 to 03FF, where it won't get clobbered by BASIC 
programs or initalization. Add the optional cassette control 
circuit, or purchase one of the commercially available ones. 
(Candex Pacific, 693 Veterans BLVD, Redwood City, CA 94063) 
and you never need envy the PET for its loading technique again. 
Operation 

Load the 'CASSOS' tape, which you have created from the 
assembly listing, just like any other machine language program 
(2C0.3FFR), then initalize the BASIC pointers by depressing 
CTRL-B, return To load a program depress CTRL-Y and RETURN. 
"PROG?" will be displayed, enter a 1-10 character program name. 
The cassette tape will be searched and the program loaded if 
found. "XXXXXXXXXX LOADED" will be output, where 
XXXXXXXXXX is the program now in memory. If the cassette 
control circuit (described later) is present the tape will also be 
stopped. A line of question marks (?????????) are displayed if the 
requested program was not found. To write a program to the 
library cassette enter Yc (Ctrl-Y, "WRITE", and RETURN. Program 
will be saved under the name requested at PROG? . "XXXXXXXXXX 
OUT" will be displayed at completion and the recorder stopped. 
To end a cassette program file enter: Yc, "EOF", RETURN; a special 
record header will be written. Note that to conserve limited 
memory space the EOF routine utilizes the program write 
subroutine so the "XXXXXXXXXX OUT" message should be ignored. 

The program is structured such that the last 63 locations of the 
input buffer is used for display messages, so if more than 191 
characters are entered at one time the program will still function, 
but without messages. The listing as presented was for a 16K 
system, change location 0358 as follows for a different 
configuration: 



2F-8K 


6F-24K 


3F-12K 


8F-32K 


4F-16K 


9F-36K 


5F-20K 


CF-48K 



deactivating the AN3 signal on the Apple game connector. A store 
to location C05F turns the recorder on and iocation C05E turns it 
off. The strobe triggers a transistor which in turn opens a relay and 
closes the connection to the remote plug, starting the recorder. If 
your recorder requires an open connection to start tape movement 
wire the relay normally closed instead of open. It is also possible to 
add a relay that would interupt power to the recorder for control if 
you have no remote capability on your recorder. 



& 



to recorder 
pin plug 




3 



N.O. 



+5V (pin 1) 



6VDC RELAY 



2500 .ru 



V| 



1000 jn. 

A/WV- 



<3 



NPN 

Chasis Ground (pin 8) 
Cassette Control Circuit 



Parts List 

All parts were purchased at a local Radio Shack 
6VDC Relay (275-004) 
NPN Transistor (2N3568 or equivalent) 
1000 Ohm Resistor 
2500 Ohm Resistor 
Mini-Plug 



+ 3.5V (pin 12) 



Program Design 

The method by which CASSOS functions is to write a program 
header block consisting of header ID, program name, and start of 
the BASIC load. This is followed by the program data itself, 
utilizing the Apple monitor routines. 



A Cassette On/Off Circuit 

The following diagram describes a simple circuit for stopping and 
starting a cassette recorder which has a "remote" plug from the 
Apple II under program control. The theory involves activating or 



All connections were made to a DIP Header which was modified 
by soldering a 16-pin IC to it so that the game paddles could still be 
used without modification when the cassette ON/Off circuit was 
in use. The common 6VDC relay was modified to be triggered by 
the game connector signals by wiring a 2500 ohm resistance 
(utilizing a series of resistors connected in series so that the sum is 
2500 Ohms) in parallel with the relay coil If your recorders rewind 
controls are disabled by the remote jack wire a switch to bypass 
the transistor between chasis ground and the relay, which will 
allow the rewind to operate when depressed. If all this is beyond 
your scope use the purchased control or simply stop and start the 
recorder manually 
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MICRO 11:21 



0£C0- 


R9 


1"! -~< 




LBR 


ti : S£jJ3 


8344- 


CFl 






BEX 




0£C£- 


'- ' Ti 


Tim 


0£ 


STR 


£8£B8 


0345- 


B8 


FS 




ENE 


£833F 


0£C5- 


R9 


Bl 




LBR 


#£B1 


8347- 


68 






RTS 




0£C7- 


£0 


8 / 


03 


JSR 


£8367 


0348- 


R0 


B8 




LEY 


#£B8 


eecfl- 


R3 


FF 




LBR 


#£FF 


834R- 


R£ 


00 




LEX 


#£00 


0£CC~ 


8B 


BB 


0£ 


8TR 


£8£BB 


834C- 


£0 


51 


83 


JSR 


£8351 


0£CF- 


m 


CR 




LBR 


£Chi 


034F- 


R0 


BB 




LEY 


#£BB 


0EB1- 


c= JU 


BC 


0£ 


. 8TR 


£8£BC 


0351- 


R9 


0£ 




LBR 


#£0£ 


8£B4~ 


m 


CE 




LBR 


£CB 


0353- 


B0 


84 




BME 


£0359 


8£D6- 


sn 


BH 


R£ 


STR 


£8£BB 


0355- 


R0 


FF 




LEY 


#£FF 


8£B9~ 


£0 


CD 


FE 


JSR 


£FECB 


8357- 


R9 


3F 




LBR 


#£3F 


y£nc- 


84 


CR 




LEY 


£CFl 


8359- 


95 


~=T'i 




STR 


£31!? X 


8£BE- 


R5 


CB 




LBR 


£CB 


835B- 


94 


3C 




STY 


£3C ? X 


0£E0~ 


£0 


80 


03 


JSR 


£0360 


835B- 


ES 






1 NX 




0£E3- 


£0 


CB 


FE 


•JSR 


£FECB 


835E- 


ES 






!NX 




8£E6- 


P9 


EE 




LBR 


#£EB 


035F- 


68 






RTS 




8£E8- 


£0 


7E 


83 


JSR 


£03 r'E 


8368- 


R£ 


010 




LEX 


#£88 














836£- 


£8 


59 


83 


.JSR 


£0359 














8365- 


E8 


EE 




BNE 


£8355 


8£EB~ 


87' R 


8 CI 


^ B5 


'■-''■-' 




0367- 


r.c* 


50 




S'l R 


£50 


8£F8- 


FF 8 


7' R 


CC 


CF CI 


C4 C5 


0369- 


R£ 


8£ 




LEX 


#£8£ 


0EF8- 


C4 FF It 


D£ 


CF-C7 


BF FF 


036B- 


R8 


Ff\ 




LEY 


#£FR 














036B- 


£0 


04 


08 


JSR 


£8304 














0370- 


£0 


48 


03 


JSR 


£0348 


0300- 


R£ 


8£ 




LEX 


#£0£ 


8373- 


R9 


0fl 




LBR 


#£0f : ! 


0383- 


lip 


07 




ENE 


$03 0B 


0375- 


R6 


50 




LEX 


£50 


0384- 


£";■-- 


68 




STY 


$68 


8377- 


£0 


£0 


03 


JSR 


£03£8 


0301b- 


£0 


6£ 


FC 


JSR 


£FC6£ 


037R- 


8B 


5F 


C8 


ST'R 


£C05F 


0303- 


R4 


60 




LEY 


£60 


037B- 


68 






RTS 




030B- 


BE 


15 


83 


C'T ';.■' 


£0315 


037E- 


*8 






PHR 




838E- 


8C 




83 


STY 


£0314 


037F- 


8B 


5E 


C0 


STR 


£C05E' 


831.1- 


R0 


00 




LEY 


#£80 


8383- 


fi£ 


0£ 




LEX 


M-i-Cl-' 


0313- 


B9 


FR 


8£ 


LBR 


£0£FRjY 


0384- 


R8 


Bl 




LEY 


#£B1 


83 i 6- 


C3 


FF 




CMP 


#£FF 


8386- 


£8 


04 


03 


JSR 


£0304 


8318- 


FR 


£B 




BEQ 


£8347 


8389- 


68 






PLR 




631 R- 


£w 


EB 


FB 


-JSR 


£FEEE 


83RR- 


fly 






TRY 




0311!- 


C8 






IM'f' 




038B- 


£8 


00 


03 


JSR 


£0380 


031E- 


BR 


F3 




ENE 


£8313 


03SE- 


48 


83 


E0 


J MP 


£E003 


83£8~ 


i.i '-' 






PRR 




039 1 - 


R9 


R3 




LBR 


#£R3 


03£ 1 - 


R9 


R£ 




LBR 


#£R£ 


0393- 


£8 


67 


83 


JSR 


£0367 


03£3- 


86 


66 




C-TV 


£68 


8396- 


£8 


48 


83 


■JSR 


£0348 


83£5~ 


c- 1~ 


61 




STR 


£fe i. 


0399- 


£0 


FB 


FE 


■JSR 


£FEFB 


83£7~ 


R9 


R0 




LBR 


#£R0 


839C- 


RB 


B0 


0£ 


LBR 


£0£B0 


8339- 


£8 


68 


FH 


-JSR 


£FB6C 


839F- 


C9 


B3 




CMP 


#£E3 


03£C- 


88 






PLR 




03R 1 - 


B0 


£9 




BNE 


£03CC 


03311- 


MM 






TAX 




03R3- 


AC- 


•EC 


0£ 


LEY 


£0£EC 


83£E~ 


R8 


00 




LEY 


#£00 


03R6- 


RE 


BE 


0£ 


LBR 


£0£BB 


0330- 


T: I - ! 


00 


0£ 


LBR 


£8£00?Y 


03R9- 


£0 


68 


03 


JSR 


£8360 


0333- 


C9 


SB 




CMP 


#£8B 


03RC- 


£8 


FB 


FE 


•JSR 


£FEFE 


8335- 


F8 


88 




BEQ 


£033F 


03RF- 


R£ 


80 




LEX 


#£08 


0337- 


91 


68 




STR 


(£68 ) !> Y 


03B1- 


BE 


El 


0£ 


LBR 


£0£B1> 


8339- 


C8 






I MY 




83B4- 


BB 


R3 


8£ 


CMP 


£0£R3? 


833R- 


CR 






BEX 




03B7- 


D8 


EB 




BME 


£8396 


833B- 


FR 


0R 




BEQ 


£0347 


83E9- 


E8 






I NX 




833B- 


B8 


Fl 




BME 


£0338 


03BR- 


E0 


8fl 




CPX 


#s8R 


033F- 


R9 


R8 




LBR 


#£R0 


03BC- 


E0 


F3 




BME 


£83B1 


0341- 


3 1 


68 




STR 


8£60j jY 


03BE- 


RE 


EC 


0£ 


LBR 


£8£BC 


0343- 


88 






J MY 




03C1- 




CR 




STR 


£CR 


MICRO 11:22 
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< 



# i 



03C3- 


RB 


ED 


03 


LDR 


<y£BB 


03E3- 


F0 


10 




BEQ 


S03F5 


03C6- 




CE 




3TF! 


SCE 


03E5- 


39 


C5 




CMP 


#SC5 


03C8- 


R9 


FI 




L.DR 


#SF 1 


03E7- 


D0 


R8 




EME 


£839 1 


83CR- 


U0 


B£ 




BNE 


$637 E 


03E9- 


SB 


B0 


03 


STR 


SO£B0 


03CC- 




5E 


C0 


STR 


£C05E 


03EC- 


30 


48 


03 


•JSR 


$0348 


03CF- 


R8 


30 




LEX 


#£80 


03EF- 


3D 


5F 


CO 


STR 


£C65F 


03B1- 


A9 


BF 




L.DR 


#$EF 


03F3- 


4C 


Cfl 


03 


JMP 


£0£CA 


03D3- 


38 


ED 


FD 


JSR 


sFDED 


03F5-- 


4C 


C0 


03 


JMP 


$0£C0 


03D6- 


CA 






BEX 




03FS- 


4C 


DE 


03 


•JMP 


:$03HE 


031)7- 


IJ0 


FS 




BNE 


<03D i 


83FB- 


00 






ERK 




03D9- 


30 


III! 


FB 


JSR 


SFBBD 


G3FC- 


00 






ERK 




03BC- 


F'0 


B3 




EEC! 


£039 1 


03FD- 


00 






ERK 




03BE- 


Fili 


1 


03 


LEFi 


$0301 


03FE- 


M0 






ERK 




83E1- 


f s 


i.' i' 




CMP 


#£B7 


03FF- 


00 






ERK 





A Cassette Tape Catalog 

Shown in exhibit is a short integer BASIC program which when 
loaded will list all the programs on a CASSOS format library tape. 
The CASSOS sub-routines are used so the software must be core 
resident. Just load the program, insert the library cassette into the 
cassette handler, and type RUN after starting the cassette player. 



CfiLL 



-?.■-!»-■. 



"h: 



( i ) : D I m X£ \ i ) 



it; N-- 

30 INPUT "INSERT LIBRARY TRPE RHD DEPRESS 'RETURN'" 

3:@ POKE' -16389? 0: CALL -936: GUSUE 300 

40 PRINT "FILE # PROGRAM NAME BYTES" 

50 PRINT " " 

68 CALL 840: CALL -859 

70 IF PEEK (688)= fiSCC'E") THEN £10 

80 IF PEEK (688) # ASCC'S") THEN 8C8 
100 REM LOAD INTO NON-EX I ST MEMORY (800-BFF) 
110 POKE 601- PEEK (700): POKE 61? ( PEEK (701)+i£8) 
130 POKE 6£?£55: POKE 63? 191: CALL -859 
130 PRINT N? : POKE 789? 8: POKE 788;. 177: CALL 785 
140 L= PEEK (700)+ PEEK (701)*£56 
158 L=16384H_:N=N+1 
160 PRINT ,! "-L: GOTO 60 
£00 GO-SUE 300: PRINT "NO EOF MARK" 

:10 POKE -16398? 0: GOSUE 300 

:30 PRINT "***€MB OF FILE**®*" 

40 CALL -155 

>00 FOR 1=1 TO 30 

35 L~ PEEK (-16336)+ PEEK (-16336): NEXT I 

10 CALL -1059: RETURN 



>RUN 

INSERT LIBRARY TAPE AND DEPRESS 'RETURN' 

FILE # PROGRAM NAME BYTES 
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IE I RECTORY 


~ : ]d.d. 


£B ILL BOARD 


c!oo 


3R. ROULETTE 


530 


4C0L0REYR0D 


185 


5HELL0 


8838 


6E0NLING 


£113 


7B0XING 


£636 


8TICTRCT0E 


3461 



***ENn 0F file:**® 
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CONNECTICUT microCOMPUTER , Inc. 

150 POCONO ROAD ■ BROOKFIELD, CONNECTICUT 06804 
(203) 775-9659 



°JLH 

■YBTBMS 



I 



I" RS-232 H 
L MOD J 



RS-232 
INTERFACE MODULE 



PETMOD 



D 




J 1 pT^r\ CABLE ^-C^JI 

t — r^ />\ □ MODULE 

PET INTERFACE / H^ 

KIMMOD f \/ri 






1 -*- MANMOD1 1 

•■ L/ i i i i i i i i i ^ 



IUUUUU, 



KIM INTERFACE 




GPIBOEEE-488) 
INTERFACE MODULE 




TRS-80 INTERFACE 



MANUAL AND 
DISPLAY MODULE 



SENSORS 
•TEMPERATURE 

• VELOCITY 

• PRESSURE 

• 4b 

• pH 
•ACCELERATION 

• HUMIDITY 

• LIGHT LEVEL 

• FLUID LEVEL 
•ETC... 



DAM SYSTEMS b« CmC 
A complete twste* of eodules to let sour computer listen 
to the real world. 



I 



DAM SYSTEMS PRICE LIST 



DAM SYSTEMS componen Is 



AIM161 - Analog Input Module 
16 8-bit analog inputs - 100 fticrosecond conversion liae 
3 stale output - rewires one 8-bit covutcr outwit port 
for control and one 8-bit coewter input port for data. 

AIM162 - Analog IriFut Module 
As above Plus! ereeler accuracy - sold plated contacts - 
pilot lisht - switch selectable starti enable and reads 
polarities. 

POW1 - Power Module 
Supplies power for one AINU todule. 



ICON - Input Connector 
For connecting; analog inputs to the AINU 
edge connector - sqlder eyelets. 



20 pin card 



OCON - Output Connector 

For connecliM the AINU to a computer - 20 pin card eds* 
connector - solder eyelets. 

MANMOD1 - Manifold Module 

Use in place of ICON. Screw leriinsl barrier strips for 
connectins josstidlsi rolentioeetersr voltase sources, etc. 
Elitinates the need fx solderins. PluSs into the AINU. 

ANAMAN1 - Analoa Manifold Module 
Use in place of ICON. Connects MM SYSTEMS SENSORS to the 
AINU without solderins - sensor cables just plus in. PluSs 
into the AINU or thelWMDl. 

SENSORS 

Sensors for teweralurei pressure, flaw. hueirfiltK level. 
pH. notion, etc. 

COMPUTER INTERFACES 

For the PET. KM. TRS-80. etc. Use in place of KM. 
Elitinates the need for solder ins" or special construction. 

PETMOD - PET Interface Module 
Cives two IEEE ports, one user port and one MM SYSTEMS 
interface port. Saves wear and tear on the PET' s printed 
circuit board. Also called the PETSAVR. 



$179.00 

*249.00 

$14.93 
49.95 

*9.95 



TBA 



TBA 



TBA 



*49.95 



KIMMOD - KIM Interface Module *39.95 

Cives one application connector port and one SAN SYSTEMS 
interface port. 

CABLE "A" - Interconnect Cables TBA 

Connects coeeuter interface to AINU. NANDIS1. XPAWR1. 
etc. 

CABLE A24 - Interconnect Cable *19.95 

24 inch cable with interface connector on one end and an 
OCON eauivalent on the other, 

MANDIS1 - Manual and Display Module TBh 

Connects between the AINU and the coeeuter interface. 
Allows ■anwl or coeMter control of the AINU. Displays 
channel nuaber and data. 

GPIB MOD - GPIB < IEEE-488 > Interface TBA 

Allows the DAN SYSTEMS MODULES to be used with the CPU bus 
instead of a napuler's other I/O ports. 

RS232 MOD - RS232 Interface Module TBA 

Allows the DAN SYSTEMS NODULES to be used with an RS-232 
port or terminal. 

XPANDR1 - Expander Module TBA 

Allows up to 128 8-bit analo* inputs <8 AIMU Nodules) to 
be connected U one sysle*. 



DAM SYSTEMS sets 



AIM161 Starter Set *189.00 

Includes one AIHUl. one P0U1, one ICON and one OCON. 

AIM142 Starter Set *259.00 

Includes one AIM142, one PW1. one ICON and one OCON. 

PETSETla *295.00 

Includes one PETMOD. one CABLE A24. one AIN141. one POM and 
oneHMIODl. 

KIMSETla *2S5.00 

Includes one KIMMOD. one CABLE A24. one AINU1. one P0M1 and 
owNAJWDl. 



I 



ASK THE DOCTOR - PART III 
BITS AND BYTES 

Robert M. Tripp, Ph.D. 
TheCOMPUTERIST, Inc. 

P.O. Box 3 
So. Chelmsford, MA 01824 



The Doctor was busy this month and did not get a chance to write 
up the EPROM Programmer hardware as promised in the last 
issue. Look for it next time. A couple of people did submit some 
good info which is printed below. The Doctor encourages such 
input. Too much is happening with these new computers for 
anyone person to "know it all", so if you find out something 
interestng, please drop us a note and let us get the word out. 

Corrected AIM SYNC Program 

The early AIM User Manuals had a number of mistakes, as is to 
be expected the first batch. One of the more serious errors was 
in the listing for the SYN Write and SYN Read programs on page 
9-11. The errors have been corrected in later versions of the 
manual, but for those of you who need the programs, here they 
are - corrected. 



SYN Write Program: 



0300 20 ID F2 
0303 20 4A F2 
0306 4C 03 03 



JSR F21D 
JSR F24A 
JMP 0303 



SYN Read Program: 



0310 


A2 


00 




LDX 


#00 


0312 


A9 


CE 




LDA 


#CE 


0314 


20 


7B 


EF 


JSR 


EF7B 


0317 


20 


EA 


ED 


JSR 


EDEA 


031A 


A2 


00 




LDX 


#00 


031C 


A9 


D9 




LDA 


#D9 


031E 


20 


7B 


EF 


JSR 


EF7B 


0321 


20 


29 


EE 


JSR 


EE29 


0324 


C9 


16 




CMP 


#16 


0326 


F0 


F9 




BEQ 


0321 


0328 


DO 


E6 




BNE 


0310 



'ESC to 'F2'. Of course, a change in the op-code length will 
bring up some unexpected results, but very soon you'll catch a 
proper op-code again! 



03CB 


AD 


25 


A4 


LDA A425 


03CE 


18 






CLC 


03CF 


E5 


EA 




SBC EA 


03D1 


8D 


25 


A4 


STA A425 


03D4 


B0 


03 




BCS 03D9 


03D6 


CE 


26 


A4 


DEC A426 


03D9 


20 


24 


EA 


JSR EA24 


03DC 


20 


6C 


F4 


JSR F46C 


03DF 


20 


07 


E9 


JSR E907 


03E2 


20 


3C 


E9 


JSR E93C 


03E5 


C9 


49 




CMP #49 


03E7 


DO 


03 




BNE 03EC 


03E9 


4C 


9E 


FB 


JMP FB9E 


03EC 


C9 


20 




CMP #20 


03EE 


DO 


F2 




BNE 03E2 


03F0 


AD 


25 


A4 


LDA A425 


03F3 


38 






SEC 


03F4 


65 


EA 




ADC EA 


03F6 


8D 


25 


A4 


STA A425 


03F9 


90 


DE 




BCC 03D9 


03FB 


EE 


26 


A4 


INC A426 


03FE 


90 


D9 




BCC 03D9 



Submitted by 

Cebhard Brinkmann 

Koblenzer Str. 1. 

D-5401 Kaltengers 

West Germany 



Patch for the AIM-DISASSEMBLER 



It soon becomes obvious, that the disassembler is extremely 
paper consuming, because no single-stepping is provided. The 
following program will save you money and time! 

Set F1 (010C) to 'JMP 03D9' and F2 (01 OF) to 'JMP 03CB'. After 
loading the desired program address (*), hitting F1 will dissable 
just this line on the display. To advance, press the space-bar. 
If you want to modify, use T and the program jumps to the 
Instruction Mnemonic Entry. The current address will not be 
changed. 'ESC brings you back to the AIM — Monitor. With 
'FT, the next address will be disassembled 'F2', however, will 
substract trv; last used op-code length from the current address 
and then disassemble the last entry! It is even possible to 
disassemble further "backwards", just keep switching from 



SYM Tape Evaluation 

As a result of our telephone conversation on Monday, I decided 
to look for any possible hardware problems in the SYM Cassette 
Interface. Some results are shown below. Whether these are 
related to your cassette problems is unknown. In checking my 
Sony TC-62, I found an unexpected very slow acting AVC 
(increases gain very slowly, decreases rapidly). This could cause 
problems in a level sensitive system as the gain slowly increases 
during the recording process to a quite large degree. 
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MICRO 11:25 



+ 3.0V 
+ 2.5V 
+ 2.0V 

+ 3.0V 
+ 2.5V 
+ 2.0V 

+ 3.0V 
+ 2.5V 
+ 2.0V 




l_n_r 



WAVEFORM A 



WAVEFORM B 



WAVEFORM C 



1) 



Comments on Synertek BASIC (8K) VI. 1 
2 ROM's, U21, U22, C00ODFFF, (J) (0) (CR to start BASIC 



'0" 



"V 



"1" 

740 usee 
wide 



All waveforms taken at PIN 3 of the LM311 (U26) with a sync 
tape generation program running (hi-speed). Audio OUt (HI) is 
connected directly to Audio In (A-P to A-L). 

WAVEFORM A is the normal condition as received (VIM 

80650912 E/C0O03) 
WAVEFORM B is with C14(.0047uF) removed 
WAVEFORM C is with C14 removed and C16(.01uF) paralled with 
1uF 

CONCLUSION: C16 is much too small and could easily cause 
the system to become marginal in the presence of noise and 
normal level variations. C14 has no apparent real value and 
seems to unnecessarily increase transition time uncertainty. 
The small value of C16 and the presence of C14 together 
simulate the waveform degradation of a very limited band- 
width recorder. Their effect augment rather than compensate for 
the deficiencies of a recorder. Suprisingly, it appears that it 
would be a recorder with poor low, rather than high, frequency 
response which would be most likely to have problems with C16 
is maintained at its original .01 microfarad value. 

Submitted by 

Don Lloyd 

101 Western Ave., Apt. 76 

Cambridge, Ma. 02139 



FLASH ! ! ! 

Synertek has finally solved the 
sensitivity problem which has 
been of concern to users of the 
tape cassette, according to a 
spokesman from Synertek Systems. 
I have sent them a pair of 2716 
EPROMs to be programmed with the 
new monitor. If these are returned 
in time, I will make a full report 
in next month's issue. 



2) Commands ■ CLEAR, LIST, NULL, RUNN, NEW CONT, LOAD 

"A", SAVE "A" 

3) Statements - DATA, DEF, DIM, END FOR, GOTO, GOSUM, 

IF. GOTO, IF.. THEN, INPUT, LET, NEXT, ON. 
GOSUM, POKE, PEEK, PRINT, READ, REM, 
RESTORE, RETURN. STOP, WAIT. 

4) Functions - ABS(X), INT(X), RND(X), SCN(X), SQR(X), TAB(I), 

USR(I), USR(I,J,...Z), EXP(X), FRE(X), LOG(Xj, 
POS(l),SPC(D 

SIN(X), COS(X), TAN(X), ATN(X) all must be 
loaded separately - App Note 53-SSC not quite 

available. 

5) Strings ■ DIM A$, LET A$, INPUT X$, READ X$, PRINT X$ 

6) String Functions - ASC(X$), CHR$(I), FRE(X$), LEFT$(X$,I) 

LEN(X$), MID$(X$,I), MID$(X$,I,J), RIGHTS 
(X$,l), STR$(X), VAL(X$) 

7) Operators =,-,+ , exponentiation, *, = , (not equal), , , 

(LTE), (GTE), NOT, AND, OR 

8) Uses Memory from 0200 HEX up until ROM or no memory, 

unless restricted at start up. 

9) Weaknesses - Only editing is delete line, delete last character 

(RUB-OUT), no ROM TRIG, no program merging 
capability. 
10) Strengths - Good array features (but no MAT functions), 9 
digit accuracy floating points 
4 byte floating point numbers 
7 bits + 1 bit sign exponent 

1 bit sign +24 bit binary value (MSbit = 1 always) 
&"0O0F" = 15 decimal 
hex string conversion to decimal 
USR (U....Z) Machine language subroutine multiple 
parameters on stack result (A,Y) 
Speed is comparable to OSI Kilobaud Oct '77 ratings (1MHz) 
Overall subjective by infrequent BASIC user: 7.5/10 seems 
appropriate to overall product. 

Submitted by 

Don Lloyd 

101 Western Ave., Apt. 76 

Cambridge, Ma. 02139 



EPR0M PROGRAMMER 




S0M, 



Software avettaMe far M, 
S0S5, Z-S0, 6502, KIM-I, 1 802. 

The EP-2A-79 will program the 2704, 2708, 
TMS 2708, 2758, 2716, TMS 2516, TMS 2716, 
TMS 2532, and 2732. PROM type is selected by 
a personality module which plugs into the front 
of the programmer. Power requirements are 1 1 5 
VAC, 50/60 HZ at 15 watts. It is supplied with a 
36-inch ribbon cable (14 pin plus) for connecting 
to microcomputer. Requires 1 Vi I/O ports. 
Assembled and tested $145, Plus $15-25 for 
each personality module. Specify software. 

OPTIMAL TECHNOLOGY, INC. 

Mat Weed 127, EariyivMe, Va. 22436 
Mmm 804-973-5482 
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DR. DALEY'S 
SOFTWARE FOR THE PET 

DR. DALEY'S software continues to expand offerings. Listed betow are our most popular programs. 
No PET owner should be without these. Dealers, you should stock them as well. 

OCT TREK 3 Like STARTREK, but has several UNIQUE features. For 
example, the unpredictable EXPERIMENTAL RAY, who 
knows what it will do $ 7 . 95 

BACKGAMMON ,ts you vs the PET with an excitin 9 Q ame of backgam- ^ 7 oc 

MON $ / .33 

MASTER MIND p,avs tw0 simultaneous games, one where you guess ^ _ oc 

PET's secret code, and another where PET guesses yours $ 7.95 

RENUMBER Wi " renumber y° ur BASIC programs, including all jump 

statements. For a 6K source code requires less than 5 * 4n ftc 
seconds $1 Z . 95 

PILOT A BASIC coded PILOT interpreter. A second high level 
language for the PET. Simple to use, even a ten year old 
can learn to use PILOT quickly. With sample PILOT pro- ^ ft _ 

grams and documentation $lc.95 

CHECKBOOK Wi " baiance vour checkbook and save totals in 16 
categories on tape. Will produce end of month and year to 
date summaries. Categories can easily be changed to -» HO ftc 
suit your own purposes $lc. 95 

MAIL LIST Keeps a mailing list and will sort the list into sub groups ff ._ ft _ 
using up to three search parameters $lc. 95 

All of our programs are available on tape or for the Compu-Think disk. We charge $5.00 for the disk 
and shipping, but you can subtract $1.00 for each program which we place on the disk. Order 5 pro- 
grams and you get the disk free! 

M All I ICT The above program has been modified for disk files. Will 

be placed on a disk by itself which you can then use for ^ 

your mailing list $19.95 

FLASH 1 We nave ^ ust acc l u ' re d tne r ig nts to distribute a linking 
loader for BASIC programs! This will allow you to link ex- 
clusively numbered BASIC subroutines in memory. No 
serious programmer should be without this useful pro- . ft _ 
gramming tool $1 Z . 95 

An ideal companion to the linking loader will be our library of useful subroutines which 

can be linked into your own program. Currently over 25 useful routines are included. 

These range from plotting utilities to a beautiful display of rolling dice. Write or call for ^ Afl nc 

a list or order the set for only $49.95 



Remember that we GUARANTEE that your order will be shipped within four business days from 
receipt or you will receive a coupon for a discount on a future purchase. 



Charge your order to 
MC/VISA 



'. ^^^.^^^ 


1 


VISA 


[master charge 


1 

j 


1^ '^^^ '^^^V 



DR. DALEY, 425 Grove Avenue, Berrien Springs, Michigan 49103 



Phone (616) 471-5514 Sun. to Thurs. noon to 9 p.m. eastern time 



pmnsjuui-jiLum 




♦ ( 

The best memory board around. 

Here's why 

• Low power 2114 Static RAM's • Two independent 8Kx8 memory banks 

• Fully buffered • One supply only, 7-9V unregulated 

• High quality IC sockets 

• All switches accessible from top of board HOI/' Ot^ili^ DA IV A ^OOC f\T\ 

• Top grade glass fiber PCB, with gold lOI\ OlallC riMIVI 3>O^.O.UU 
plated contact area. a -^—^.-^Ukl^-J ~. M |., 

. Dual regulators ASSemDleCI CMlly. 

Designed specifically for the: KIM-1, SYM-1, AIM-65. 

Specifications: Access time 450 nS max. 

Power consumption 1 .35 amp. typ. 
Also available: Buffered Mother Board, EPROM Programmer, CVT Power Supply. Software: 
Standard Forth Compiler, Sea-65 Editor/ Assembler. 

Order from local dealer or directly from: 

SEAWELL MARKETING INC., 315 N.W. 85th, Seattle, WA 98117 • (206) 782-9480 

Available in Europe. Write for dealer list. 

D Check or money order enclosed G Send more information ..„ 

O Charge my Master Charge or VISA Name _ _ 

- - . . .. . Address - ._ .- 

Acct.1t-. . - Expir. Date . .. City _ .. State __ --Zip 
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Mike Rowe 

P.O Box 3 

S.Chelmsford, MA 01824 



Name: Slow-Scan Television Package 

System: Apple II 

Memory: 16K (min) 

Language: Machine Language 

Hardware: Standard Apple II 

Description: This software system allows the Apple II to send and 

receive U.S. amateur standard slow-scan T.V. pictures (120 line-15 

Hz) via any ham radio SSB transceiver. A real-time display of the 

received picture in high-resolution graphics is accomplished with a 

sophisticated image processing algorithm. Low-resolution images 

for transmission are prepared with a large-character display editor 

as well as a drawing editor. All modulation and demodulation of 

the audio FM subcarrier is performed by the software — replacing 

hundreds of dollars of hardware required by other SSTV systems. 

Comes on cassette with 8 mins. of test pictures. 

Copies sold: about 100 

Price: $20. 

Includes: Cassette tape and 5 pages of documentation. 

Author: Chris H. Calfo - WB4|MD 

Available from: 

C.H. Calfo 

602 Orange St 

Charlottesville, VA 22901 



Name: S-C Assembler II (disk version) 

System: Apple II with at least one disk 

Memory: 24K or more 

Hardware: Apple II, Disk II, optional printer 

Description: Disk version of the popular S-C Assembler for the 

Apple II. Combines a text editor and an assembler in one memory 

resident package of 3072 bytes (100O-1BFF). Carefully integrated 

with the Apple II ROM-resident routines, and with Apple DOS. 

Editor includes full screen-editing, BASIC-like line number editing, 

tab stops, and renumbering. LOAD and SAVE commands for 

storage of source programs on disk files or cassette. JOIN 

command for appending two source programs from cassette. 

Standard Apple II syntax for opcodes and address modes. Labels 

(up to 6 characters), arithmetic expressions, comments in a 

liberated line format. English language error messages (not coded 

numbers). DOS and Apple Monitor commands directly available 

within the assembler. Speed and suspension control over listing 

and assembly. Includes printer deiver for Practical Automation 

printer, with instructions for modification to any other printer. 

(Cassette version is still available: it has fixed line format and 

labels up to four characters.) 

Copies: Over 200 of cassette version, over 25 of disk version. 

Price: $35 for disk version, $25 for cassette version (Texas residents 

add 5% sales tax) 

Includes: 32-page reference manual, disk with assembler, Master. 

Create, RAWDOS, and two sample source programs. 

Author: Bob Sander-Cederlof 

Available from: 

S-C SOFTWARE 

P.O. Box 5537 

Richardson, TX 75080 
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Name: PRO-CAL-I 

System. Commodore PET 

Memory: 8K 

Language: Microsoft BASIC 

Hardware: PET 

Description: PRO-CAL-I is a reverse polish programmable 

scientific calculator program ideally suited to scientific and 

educational applications. It combines the best features of the PET 

with those of hand-held calculators such as the HP 97 and the Tl 

"Programmer". It supports single key execution of more than 50 

functions and implements calculations in binary, octal, decimal, 

and hexidecimal number systems. The program displays 10 

memory registers, 5 stack registers, and a record of the 14 most 

current operations. 

Copes. 40 

Price: $26.00 for software on cassette and an operating manual. 

Author: Robert M. Munoz 

Available from: 

APPLICATIONS RESEARCH CO. 

13460 Robleda Rd. 

Los Altos Hills, CA 94022 

Name: FINANCIAL ANALYSIS: A Tutorial 

System: APPLE II and PET 

Memory. 16K 

Language: Basic 

Hardware: APPLE II with cassette recorder, or a PET (8K) 

Description: An interactive learning cassette with chapters on 

Risk, Short-term and Intermediate-term Financing, Financial 

Statements, and Key Business Ratios. The user is then put into the 

position of having to use these concepts by playing the Meany 

Manufacturing Business Came. 

Copies: Hundreds available 

Price: Sugg. Retail: $16.50 " 

Includes: Tape cassette and informative booklet 

Author: Brian Beninger 

Available from: 

Local APPLE or PET dealers of: 

SPEAKEASY SOFTWARE LTD. 

P.O. Box 1220 

Kemptville, Ont., KOC 1J0 

Name: STAT III 

System: Commodore PET 

Memory: 8K 

Language: BASIC 

Hardware: Standard PET 

Description: STAT III accepts a set of numbers and calculates the 

following: mean, median, mode, highest number in the data, 

lowest number in the data, range, variance, standard deviation, 

average deviation, and sample standard deviation. STAT Ml can 

display a bar graph of the users data on the CRT. In addition the 

user may correct errors in his inputted data before processing. 

Copies: Just released 

Price: $7.95 

includes: Cassette, source listing (program is self documenting] 

Author: Michael J. McCann 

Available from: 

THE PET PAPER 

P.O Box 43 

Audubon, PA 19407 
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Name: Apple Pi 'Life' 

System: Apple II 

Memory: 4K 

Language: BASIC and assembly 

Hardware: Apple II with 2 operable game paddles with switches. 

Description: Apple Pi 'Life' allows variable grid sizes from 8X8 up 

to 40X40 in increments of 1. Paddle 1 is only read when the switch 

is depressed. Speed is controlled by paddle and can be varied 

from 550 gpm to 2000 gpm for an 8X8 grid. For a 40X40 grid, speed 

can be varied from 25 gpm to 140 gpm. The speaker is toggled each 

time a cell is processed, except at minimum or maximum speed, to 

give the sounds of 'Life'. The bottom of the grid wraps around to 

top of grid, and vice-versa. The right of the grid wraps around to 

left of grid, and vice-versa. There are three tables of pre-defined 

objects which can be setup on the grid by number and x,y 

location. A description of the object table structure is given in the 

documentation. Keyboard controls are: P-pause until next 'P', 

Z-zero grid and setup objects, O-setup objects on grid, N-new 

colors, and E-exit program. Any two distinct colors may be used for 

live and dead cells. 

Copies: New, just released. 

Price. $12.00. Texas residents add sales tax. 

Includes: Programs, object tables on cassette, documentation. 

Order Info: Checks only. 

Author: Harry L. Pruetz 

Available from. 

Microspan Software 

2213A Lanier Drive 

Austin, TX 78758 



Name: Amateur Radio Communications Package 
System: Apple II 
Memory: 8K (min) 

Language. Machine Language and Integer BASIC 
Hardware: Apple II and user provided interface 
Description: This software package allows the Apple II to 
communicate in any of three codes: Morse, Baudot, or ASCII, with 
a minimum amount of external hardware required. Some features 
include: Variable size text buffer and live keyboard allow 
preparing text for transmission while receiving or transmitting; 3 
field screen display — each field scrolling separately; user defined 
stored messages are referenced by a keyboard and can be inserted 
anywhere in the text; automatic 72 character line formatting with 
word wrap-around; continuously variable code speeds; adaptive 
Morse receive and lots more! All I/O uses the on-board (game) I/O 
connector. 

Copies sold: over 100 
Price: $18. 

Includes: Cassette tape and documentation with sample interface. 
Author: Chris H. Calfo - WB4JMD 
Available from: 
C.H. Calfo 
602 Orange St. 
Charlottesville, VA 22901 



This Catalog is a FREE feature of 
MICRO. Your entry must be typed, 
must conform to the standard format, 
and Applications/Utilities will be 
given preference over Games. 



Name: TRANSACTIONAL ANALYSIS: An Introduction 

System: APPLE II and PET 

Memory: 16K 

Language: Basic 

Hardware: APPLE II with cassette recorder, or a PET (8K) 

Description: An introduction to T.A. - a system for understanding 

human behaviour. Chapters include: You As A Person, Stroking, 

Transactions, Are You Listening?, the Balancing Came. This 

interactive learning cassette will help you gain better 

understanding of why you get along with some people and not 

with others and may give you a better understanding of yourself! 

Copies: Hundreds available 

Price: Sugg. Retail: $16.50 

Includes: Tape cassette and informative booklet 

Author: Joy Karp 

Available from: 

Local APPLE or PET dealers or: 

SPEAKEASY SOFTWARE LTD. 

P.O. Box 1220 

Kemptville, Ont, KOG 1J0, Canada 



Name: DOS TEXT EDITOR 

System: APPLE II 

Memory: Cassetts-16K, Applesoft Rom-24K, DOS-32K 

Language: Applesoft II 

Description: EDIT is a program designed to facilitate changes to 

disk and cassette text files. The program has 24 commands to 

manipulate files. Included are: INSERT, DELETE, CHANCE, 

SEARCH, ADD, LIST, TEXT, DISPLAY, PACK, MODE, TAB, CLEAR, 

APPEND, SAVE, CONCAT, and STRING CHANGE. Commands that 

operate on blocks of data such as Range DELETE, LIST, SEARCH, 

and STRING replace are also provided. EDIT may also be used to 

create Disk files. 

Copies: just released 

Price: $16.95 (Add $5 if desired on diskette) 

Specify if Applesoft ROM 

Includes: Program cassette or diskette, Complete documentation, 
and users manual. 
Author: Robert Stein 
Available From: 

Services Unique, Inc. 

2441 Rolling View Dr. 

Dayton, Ohio 45431 



Name: REAL-I 

System: Commodore PET 

Memory: 8K 

Language: Microsoft BASIC 

Hardware: PET 

Description: REAL-I is a real estate investment analysis program 

which models an investment by computing the cash flow, tax 

advantage, inflation hedge, internal rate of return, and other 

quantities as they change over the years under the effects of 

inflation. It specializes the calculations to the tax position of the 

investor and helps him to judge the relative merits of various real 

estate investments opportunities. 

Copies. Just released 

Price: $29.00 for software on cassette and an operating manual. 

Author: Robert M. Munoz 

Available from: 

APPLICATIONS RESEARCH CO. 

13460 Robleda Rd. 

Los Altos Hills, CA 94022 
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SYM-1 6522-BASED TIMER 

John Gieryic 

2041 138 Avenue, NW 

Andover, MN 55303 



Your SYM-1 comes with a number of timers capable of a wide 
range of timing intervals. Unfortunately the SYM REFERENCE 
MANUAL does not provide information which can easily be 
digested by a novice. I'd like to attempt a more down to earth 
description of timer 1 on the Versatile Interface Adapter 6522 for 
those of us who aren't hardware inclinded. This timer is capable of 
very accurate time delays in the range of fractions of a second. It 
has an interrupt associated with it plus the ability to generate 
evenly spaced interrupts. 

Setting Up The Interrupts 

The first step in programming this timer is to place an address in 
the Interrupt Request Vector [IRQ] located at address A67E and 
A67F. A67E contains the low byte of the address and A67F contains 
the high byte. This address in the IRQ is the location you will be 
"jerked to" when the timer times down and generates an interrupt. 
Your code will be as follows: 



Location 

200 
203 
205 
208 
20A 



Code 

20 86 8B 
A9 00 



JSR ACCESS disable memory write protect 
LDA #00 interrupt address 



8D 71 A6 STA A67E 
A9 03 LDA #03 
8D 7F A6 STA A67F 



Low byte 



High byte 



Our next step is to set two locations so the hardware can "see" the 
interrupt and tell us where it is coming from. These two locations 
are the Interrupt Flag Register [IFR] at location A00D and the 
Interrupt Enable Register [IER] at location A00E. The IER controls 
interrupts from 7 different sources on the 6522. We will only be 
interested in bit6. This is the one for our timer T1. We must set this 
bit to a logic 1. This tells the 6522 we will accept interupts from 
timer T1. The code follows: 

Location Code 

20D A9 CO LDA #CO 

20F 8D OE AO STA AOOE 

"Hey, wait a minute! Where did that 'C come from? I thought you 
said we were only going to set bit 6?" 

Yes, I did. We must supply the 6522 with a bit more information 
(no pun intended). We must tell it we are going to SET one of the 
IER bits. This is done by setting bit 7 to a logic 1, hence our CO. 
Note bits thru 5 are a zero. This tells the 6522 we don't want to 
change the condition of any of the other bits in the IER when we 
do our store. From this you should be able to see how we CLEAR 
any one of the IER bits. You guessed it. Bit 7 will be a logic zero 
and the IER bit(s) to be cleared will be a logic 1. 



The Interrupt Flag Register [IFR] tells the user which interrupt has 
occurred (when we get one). This information can be used by the 
interrupt routine to "see" which element on the 6522 gave us the 
interrupt. We want to initialize (clear) our flag bit for timer T1 (bit 
6). I don't want to disturb any of the other bits. Note clearing a bit 
in the IFR is not the same as in the IER. 



Location 



Code 



212 


AD OD AO 


LDA AOOD 


215 


2 c t nr 


AND #BF 


217 


8D OD AO 


STA AOOD 



When we do get an interrupt from any of the enabled 6522 devices 
(bit = 1 in the IER) then bit 7 in the IFR and the corresponding bit 
in the IFR will both be set to a logic 1. We can determine if this 
interrupt came from the 6522 by just looking at bit 7 of the IFR 
(ASL followed by a test of the C bit). If bit 7 is a logic zero then the 
interrupt came from some other place. This will save some time 
when we are trying to find out where this interrupt originated. You 
should log this bit 7 information in the back of your mind since I 
won't use it here. 



Setting Up The Timer 

One more step before starting our timer. I'm going to set our timer 
to the free running mode. This means it will count down, give an 
interrupt and then immediately begin counting down again. I 
won't need to worry about instruction cycle times within any 
timing loops. I know I will get repeated interrupts at the exact 
interval requested. Setting the Auxiliary Control Register [ACR] bit 
7 to a logic 1 establishes the free running mode. 



Location 


Code 




21A 


A9 CO 


LDA #CO 


21C 


8D OB AO 


STA AOOB 



Now we have the four mechanical steps finished.. .setting up the 
IRQ, IFR, IER and ACR. Setting the time delay is next. The T1 timer 
has two latches (high and low order) and two counters (high and 
low order). This results in a 16 bit counter. The low order latch is 
loaded first. In this example I will set up for a delay of .05 seconds. 
This corresponds to a count of C350 (one count for each 
microsecond). 



Location 

21F 
221 



Code 

A9 50 
8D 06 AO 



LDA #50 load low order latch 
STA A006 
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Now we will load the high order latch with the value C3. This 
instruction will do more than load the high order latch. It will also 
write the high order latch into the high order counter as well as 
write the low order latch into the low order counter. This one 
instruction will transfer all 16 bits from the latches to the counter 
at the same instant. Without this hardware assist we would be 
unable to load the counter accurately since the counter begins to 
count down immediately after being loaded. 



Method 2 



Location 

224 
226 



Code 

A9 C3 
8D 05 AO 



LDA #C3 
STA A005 



load high order latch 



Code 



AD 04 AO LDA A004 



Now the processor status and registers can be restored and a return 
executed to the location in SCAND at which the interrupt 
occurred. Remember you must restore the registers in the exact 
reverse order used at the entrance to the interrupt routine. This is a 
major point. 



Code 



The timer is now running and will generate an interrupt .05 
seconds (C350) later. This corresponds to 50,000 clock cycles. If 
you were programming a clock your remaining code at location 
229 would now initialize your hours, minutes and seconds 
counters, initialize the display buffer and then go into a tight loop 
calling SCAND in order to illuminate the LED's. 

Servicing The Interrupt 



68 


PLA 


A8 


TAY 


68 


PLA 


AA 


TAX 


68 


PLA 


28 


PLP 


40 


RTI 



pull accumulator from stack 

transfer to Y index 
pull accumulator from stack 

transfer to X index 
pull accumulator from stack 
pull processor status from stack 
Return from Interrupt 



Our interrupt routine at location 300 is now executed when we 
receive the interrupt. The first thing we must do is SAVE the 
processor status and registers. This is done so we can restore these 
items when we are finished with our interrupt processing and jump 
back into SCAND from where we were "jerked out." 



That's the end of the lesson for today. In a future article I will use 
the information presented here to develop an operating system for 

your SYM-1. 



Location 




300 


08 


301 


48 


302 


8A 


303 


48 


304 


98 


305 


48 



Code 



PHP save processor status on stack 

PHA save accumulator on stack 

TXA transfer X to A 

PHA save X register on stack 

TYA transfer Y to A 

PHA save Y register on stack 



If you were programming a clock you would now increment a 
counter. If the counter equalled twenty then reset it and increment 
the time in the display buffer by one second. 

Now the interrupt is "serviced." In order to clear the way for the 
next interrupt, the T1 interrupt flag must be reset otherwise the 
next interrupt will be blocked. This clearing can be done in either 
of two ways. Method 1 will write into the high order latch. This 
write uses a different address for the store instruction than the 
write used to initialize the timer counter. In doing this the T1 
interrupt flag will be reset but it will not disturb the current value 
in the counter. Remember this is a free running counter in our 
example and automatically resets itself when the interrupt 
occurred. By this point in time it has already counted down from 
its original value of C350 toward zero (and the next interrupt). 
Method 2 will read the low order counter. Either method will reset 
the T1 interrupt flag. 

Method 1 
Code 



Tm 



KIM BUS EXPANSION! 



A9 C3 
8D 07 AO 



LDA #C3 
STA A007 



AIM"*, VIM™, (SYM) T * KIM™ OWNERS 

(and any other KIM™ bus users) buy the 
best 8K board available anywhere: 

GRAND OPENING SPECIAL! 

HDE8KRAM-S169! 3for$465! 

Industrial/commercial grade quality: 100 hour high temp burn- 
in: low power: KIM bus compatible pin for pin: super Quality & 
reliability at below S-100 prices (COMMERICALLY rated S-100 
boards cost 25-75% more). When you expand your system, expand 
with the bus optimized lor 8 bit CPU's, the Commodore/Mos 
Technology 22/44 pin KIM bus, now supported by Synertek, MTU, 
Rockwell International, Problem Solver Systems, HOE, the Comput- 
ers), RNB, and others! 

KIM-1 computer $179 00: KIM-4 Motherboard $119: power sup- 
ply lor KIM-1 alone— $45: enclosure for KIM-1 alone $29: HOE pro 
totype board with regulator, heatsink, switch address & decoding 
logic included $49.50: book "The First Book of KIM" $9.95: book 
"Programming a Microcomputer: 6502" $8.95: SPECIAL PACKAGE 
DEAL, KfM-1, power supply, BOTH books listed above, ALL lor 
5209! 

HDE FILE ORIENTED DISK SYSTEM (FODS) FOR KIM BUS 
COMPUTERS Make your KIM (or relative) the best 6502 develop 
ment system available at any price. Expand with HDE's full size 
floppy system with FODS/Edltor/Assembler. 2 pass assembler, 
powerful editor compatible with ARESCO files KIM bus interface 
card: fast 8502 controller handles data transfer at maximum IBM 
single density speed for excellent reliability: power supply for 4 
drives: patches to Johnson Computer/Microsoft BASIC. 45 day 
delivery. Single drive— $1995 dual drive $2750 

Shipping extra unless order prepaid with cashier's check ALL 
items assembled, tested, guaranteed at least 90 days. 

PLAINSMAN MICRO SYSTEMS (div. 5C Corporation] 
P.O. Box 1712, Auburn, Al. 36830: (205P45-7735 
3803 Peppered Parkway, OpeJika 
f 1-8O0-633-8724] Continental U.S. except Al. 
Dealers for OSI, COMMODORE, COMPUCOLOR, 

^ST ALTOS 
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BOX 120 

ALLAMUCHY, N J. 07820 

201-362-6574 



HUDSON DIGITAL ELECTRONICS INC 



JUST THINK OF IT! 

YOUR KIM-1 — No longer limited to those long cassette saves and loads. 

YOUR KIM-1 — Backed up by 8K static ram so conservatively designed, 

well manufactured and thoroughly tested, HDE includes a 
no-nonsense, unconditional, 6 months parts and labor 
warranty. (Excluding misuse). 

YOUR KIM"1 — Transformed into one of the most powerful 6502 develop- 
ment systems available today. 



HDE, INC. supports the KIM-1 with 8" and 5" single and dual drive disk systems, proto- 
typing cards, card racks, desk top cabinets, motherboards, and the finest memory 
board available, anywhere, at any price. 



AND THIS IS JUST FOR STARTERS 



• • • 



Consider: A fast, 2 pass assembler; a complete line oriented editor; a comprehensive 
text output processing system; an efficient dynamic debugging tool; and, a memory 
diagnostic package so thorough it's the basis of our memory warranty. 

Plus, after the sale support that you've known you deserve, but just couldn't seem to 
get — until now. 

And, HDE products are KIM-1 , KIM-4 compatible. All boards include an oversized 5 
volt regulator and address selection switches, in a state-of-the-art 4.5" X 6.5" format, 
designed, manufactured, and tested for commercial/industrial application. 

HDE products — built to be used with confidence. 



AVAILABLE FROM THESE FINE DEALERS: 



JOHNSON COMPUTER 

Box 523 

Medina, Ohio 44256 

216-725-4560 



PLAINSMAN MICROSYSTEMS 

Box 1712 

Auburn, Ala. 36830 

800-633-8724 



AREbCO 

P.O. Box 43 

Audubon, Pa. 19407 

215-631-9052 



THE TVT-6: A USER'S REPORT 

Edward Chalfin 

447 Hendrix Street 

Philadelphia, PA 19116 
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As a computer hobbyist who wanted a video interface for his 
KIM-1, it took me a long time to decide which video board of the 
many available to choose. The main factor which influenced my 
decision was the prohibitive cost of most video interfaces, 
typically around $150 to $200. Being on a college student's budget, 
these prices were way out of my range. I was beginning to lose all 
hope when, at the PCC 77 in Atlantic City, I discovered the TVT-6, 
a video board for the KIM-1, for only $35! 

After mulling it over for a few days ($35 is still a lot of money!) and 
weighing the board's strengths and weaknesses, I decided to order 
a TVT-6 kit from PAIA Electronics. I received my kit in about 2 
weeks and built it in one night. The construction was fairly easy, 
although it may have been slightly more difficult for someone with 
no construction experience. This was due mainly to the fact that 
the instructions consisted of a reprinted construction article from 
a magazine. The board worked the first time I hooked it up except 
for a capacitor which I found out later, after a call to PAIA, had to 
be a slightly lower value. The effect of the bad capacitor was to 
widen the characters on the screen to the point that they 
interfered with each other. I must mention that the Technical 
Services Dept. at PAIA was very helpful and sent the correct value 
capacitor to me within a few days. 

I must say that Don Lancaster's TVT-6 design is truly amazing but, 
due to the fact that it uses the 6502 for its timing, it has a few 
drawbacks. In the remainder of this article I will try to describe the 
TVT-6's strengths as well as its weaknesses as I see them, having 
used this video board for over a year. 

The main weakness one encounters using the TVT-6 is the fact that 
the display disappears whenever the display program is not 
running. When using an interrupt, such as an ASCII keyboard, the 
problem is not as apparent as when implementing another routine 
which is relatively long in execution time. Also, if the display 
program is repeatedly called as a subroutine from another 
program, a noticeable jitter in the display results, which can be 
very annoying. A good example of this would be trying to play a 
'pong' type game on the screen. 

Another minor annoyance is that the display program must be 
loaded from tape every time the computer is powered up before 
the display will work. Also, for KIM owners without expansion 
memory, pages 2 and 3 of the KIM RAM cannot be used for 
program space without garbage showing on the screen. 

One drawback is the fact that memory locations $8000 through 
$DFFF are used by the TVT-6 scan PROM and cannot be used for 
expansion memory. 

Most of the above weaknesses may seem pretty important at first, 
but in fact they are not, and there are ways of getting around them. 



Since the screen flickers when called repeatedly by another 
program, such as a disassembler listing, I simply have the 
disassembler fill the screen before calling the display routine, thus 
displaying whole pages at a time. 

Though locations $8000 through $DFFF cannot be used for 
expansion memory, this still leaves space for 36K of expansion, 
which I feel is more than enough for the average KIM owner. 

Now that I have outlined the weaknesses of the TVT-6 and some 
ways of getting around them, I will describe its strengths, which, I 
feel, far outweigh the disadvantages. 

The most outstanding advantage of the TVT-6 is its $35 price tag. 
As far as I know, no other video board even comes close to that 
price range. Add to that its lower power consumption, (I have used 
the KIM t5 volt supply to power the KIM and the TVT-6), its small 
size, variable display size, and software cursor control, and you 
have what I believe is one of the biggest hardware buys around. 
Above all, I think that the TVT-6 display is one of the cleanest and 
sharpest that I have seen! 

In conclusion, I must admit that if you can afford to lay out $200 
for a video interface, then one of the more expensive boards may 
be what you need. However, if you're looking for a video board 
that works great and won't empty your wallet, the TVT-6 is 
definitely for you! 

Editor's Note: One important disadvantage which is not 
mentioned above is that of using the TVT-6 with existing software. 
If you are planning to write all of your own code, this is no 
problem. But if, more typically, you are going to use software 
which was written by others without a TVT-6, you may encounter 
serious problems. Some packages may be very difficult to interface 
to the TVT-6; others may be impossible due to timing 
considerations. The TVT-6 is a remarkable illustration of what can 
be done with a 6502 and may be a total solution for some 
applications. But, it may not be adequate in other applications. 
For a lot more information on the TVT-6, you should consult (buy?) 
The Cheap Video Cookbook by Don Lancaster, 1978. This book is 
published by Howard W. Sams & Co., Inc., 4300 West 62nd St., 
Indianapolis, IN 46288 and retails at your local computer shop for 
$5.95. This is a good tutorial on videos whether or not you intend 
to buy/build the TVT-6, but is not for the complete novice. 

For a catalog/price list on their line of cheap video pc boards, kits, 
etc., contact: 

PAIA Electronics 

1020 West Wilshire Blvd. 

Box 14539 

Oklahoma City, OK 37114 

405/842-5480 
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429. Recreational Computing 7 No 4 Iss 37 (Jan./Feb., 1979) 

Carpenter, Churck "APPLE II Easy I/O Sensing and Control". I/O control using the Apple II game connector. 

Wells, Arthur Jr. "Some New Uses for Apple II". Debugging PONG, use of Modem, etc. 

Shanis, Daniel"Breaking Trail in Alaska with Apple II". A project using 32K Apple II computers with diskettes 

in 9 remote village schools. 
Swenson, Carl "Building a H l-RES SHAPE TABLE for the APPLE II". Heres a way to create your favorite shapes. 
Saal, Harry "SPOT". Tips for the PET Owners. A machine language tape with two BASIC programs is available 

from Commodore. Also a manual on communication with the outside world. A PET SERVICE KIT from 

Commodore includes schematic diagrams and parts lists, a diagnostic jumper connector with diagnostic 

tapes, etc. Information on the "lost cusor fix". Head Alignment. 

430. MICRO No 9 (Feb., 1979) 

Reich, Dr. L.S. "Long Distance Interstate Telephone Rates". An Applesoft II program for phone rates which can 

be modified for PET or OS I computers. 
Bullard, GARY J. "The Sieve of Eratosthenes". A prime numbers BASIC program for the PET. 
Hertzfeld, Andy "Exploring the Apple II DOS". Useful information for disk users. 
Dejong, Marvin L. "6502 Interfacing for Beginners: An ASCII Keyboard Import Port". Shows a system for the 

KIM with both polled or interrupt methods of service the device. 
Tater, Cary L. "Two Short TIM Programs". One program provides a method for communcation with TIM at 

1 200 BAUD or higher. Another of fers a TIM Operating System Menu. 
Tripp, Robert M. PhD "Ask the Doctor-Part 1". A comparison of the KIM, SYM and AIM microcomputers. 
Watson, Allen "Two APPLE II Assemblers: A comparative Software Review". Advantages and disadvantages 

of the Microproducts and S-C Assemblers for the Apple II. 
Rowe, Mike "THe MICRO Software Catalog: V". Reviews of about one dozer programs for 6502 based systems. 
Rittimann, Russell "Expand Your 6502-Based TIM Monitor". A modification of the TIM system to expand the 

command set so that ROM resident programs or routines can be executed from within TIM. 
Dial, WmR. "6502 Bibliography— Part VIII". The 6502 literature continues to expand. 
Sandberg, Gary P how Does 16 Get You 10?". Hexadecimal/Decimal conversions for the Apple. 
Herman, Harvey B. "How Does Your ROM Today". Programs and techniques for testing the KIM and PET ROMs. 
Bridge, Theodore E. "Life for theKIM-1 and an XITEX Video Board". Program runsona16K Kim. 



431. CONTACT Newsletter No 4 (Dec. 1979) 

Anon "Apples work PIA's". A note to the effect that the problems reported earlier by END magazine on the 
apparent incompatibility of the Apple with PIA's have been resolved and that EDN now believes this long 
saga must have had its source in human error. (See EDN Magazine, Sept. 20, 1978) 

Anon, "The Colon as a Listing Formatter for Applesoft". How to indent your listings for neatness and easy 
reading. 

Annon "Disk Operating System Notes". Includes Notes on Data Format, Using Random-Length Records. Using 
Fixed-Length Records, Appending Files, DOS Error Codes, Getting Commas into Applesoft, etc. 

432. Dr. Dobb's journal 4 No 32 Issue 2 (Feb., 1979) 

Gordon, H.T. "An Unusual Pseudorandom Number Generator Program". Program for the KIM1. 

Carpenter, Chuck "Reset Adapter". How to avoid accidental loss of programs involving the reset button on the 

Apple II 
Prtgot, Jonathan M. "Loading Kim's Cassettes". How to load OSI cassettes into the KIM. 

433. Byte 4 No 2 (Feb., 1979) 

Libes, Sol "Byte News". Atari has two new 6502 based computers. According to the latest sales reports, more 
6502 microprocessors are being manufactured than any other uP. Most of the volume goes to high volume 
game use. 

Mathews, Dr. Randall S. "An Apple and the Queens". An Eight Queens program for the Apple. 

Raskin, Jef "Unlimited Precision Division". A BASIC program for unlimited integer division. 
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434. Kilobaud No 26 (Feb., 1979) 

Green, Wayne "Publisher's Remarks". A review of OS I's new units the Ipand IIP Challengers. 

Lindsay, Len "PET Pourri". Accssories for the PET include a voice input module, a sound output module, 
Joysticks, a digital plotter, a light pen, and an S-100 adapter for the PET. How to add sund to your PET and 
sound programming instructions. New languages to supplement Basic are PILOT and PETFORTH. New 
sources of information on the PET are the PET Manual and a manual called PETABLE, as well as a newsletter 
called Sphinx. Programming tips cover the GET, ON. . .GOSUB, and others. A new wrinkle for recovering 
programs from faulty tapes is given. 
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Flogel, Ekkehard "Apple and the PI A". Contradicting the troubles reported by EDN magazine, a board was 
developed with a PIA 6520 on it to put an Apple II and a KIM together. Programs can be sent from one unit 
to the other and vice versa. 

Price, David "Music, Maestro". The AD8 is a computer-controlled synthesizer system using a 6502 
microprocessor and a 6820 I/O port. 

Bishop, Robert J. "The Apple Speaks. . .Softly". Apple II Voice digitizer. 

435. Calculators/Computers Magazine 3 No 1 (Jan./Feb., 1979) 

Day, Jim "High-Resolution Apple Art". Applesoft II program for various shapes. 

Albrecht, Bob and Karl "PET BASIC for Parents and Teachers". PET Conventions in a simple snimation program. 

436. 73 Magazine No 221 pg 21 (Feb., 1979) 

Birman, Paul "Petting". How to find the end of a program on tape when you want to load a new program into 
your PET. 

437. Personal Computing 3 No 2 pg 63-74 (Feb., 1979) 

Gerue and McNeil, "Chess Challenger-10 Wins Microchess Tourney". Microchess 2.0, Peter Jennings entry, 
took fourth place. This is 6502 based. 

437. Creative Computing 5 No 1 (Jan., 1979) 

Yob, Gregory "Personal Electronic Transactions". New products described are Expandapet memory, PET ROM 

disassemblies, a useful book on what the PET rom is all about, Some data on the User Port, PET Video Slave 

display. Exploring PET random numbers, PET sounds and music, etc. 
Wells, Ralph "HOw about a 'Counterfeit Cursor' For your PET?". Enables one to use the cursor in games or 

under better control. 
Heuer, Randy "Ohio Scientific Superboard II and Challenger 1P". A review of OSI's new lost cost micro. 
Rugg and Feldman "Speed Reading Made Easy, via Your PET". This program turns your computer into a 

tachnistoscope to teach improved reading habits. 
Milewski.Richard A. "Apple-Cart". All about Data Files on diskettes. Simple file accessing statements, Sample 

serial access programs, and some software reviews. 



NOW AVAILABLE 

ForSOL-llA 



Basic Software 

andPETSK 
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General Pack 1 

(Checkbook Balancer, Tic Tac Toe, Metric 

Conversion) $10.95 

General Pack 2 

(Space Patrol, Biorhythm, Battlestar, One-Armed 

Bandit) 18.95 

Financial Pack 1 

(loans, Depreciation, Investments) 12.95 

Financial Pack 2 

(Mortgage & Loan Amortization, Future 

Projections, Risk Analysis) 12.95 

Statistics Pack 1 

(Mean & Deviation, Linear Correlations & Regression, 
Distribution, Contingency Table Analysis) 1 8.95 

Game Pack 1 

(Baksetball, Object Removal, Bowling, Darts, 

Gopher) 22.95 



Game Pack 2 - 

(children - educational) 
(Arithmetic Cod, Addition Dice, Distance 
Rate X Time) 



Tape Data Query 

(File Management System)- For the KIM-1 



12.95 
12.95 

50.00 



PCROS - a Real-Time Operating 
System in IK KIM RAM 

Assembly listing 24.95 

Cassette tape with user's manual 14.95 

Schematic for relay control board 9.95 

All programs on high-quality cassette tape. 

Send self-address, stamped envelope for 

complete software catalogue. 
Send check or money order to: 

H. GELLER COMPUTER SYSTEMS 

Dept. M 

P.O. Box 350 

New York, New York 10040 

(New York residents add applicable sales tax) 
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THE ULTIMATE PET RENUMBER 

Don Rindsberg 

The Bit Stop 

Box 973 

Mobile, Alabama 36601 
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This article can be of help to the BASIC programmer in providing a 
fast, fool-proof renumbering system, but it also includes details on 
how to use the PET BASIC interpreter's own machine-language 
routines to do some useful chores. 

Renumbering programs written in BASIC, such as Jim Butterfield's 
(see MICRO Dec 78 - Jan 79) are very slow in renumbering long 
programs, and because BASIC is cumbersome in performing such 
routine chores, the machine-language approach has some major 
advantages. This routine will renumber a 300-line program in 
around 20 seconds, as compared to more than 300 seconds for 
Jim's BASIC version. Further, Jim is forced to duck the issue of 
providing space for extra-digit line numbers, whereas by calling 
BASIC'S line insertion routine, this program provides enough space 
for five digits for every COTO, COSUB, etc. 
The entire program for renumbering is given in hexadecimal in 
listing 1. More later about how to enter it into your machine. With 
your BASIC program and the renumber routine in RAM, press 
SYS8181 (by coincidence, the name of the program) and you will 
either get a message of reassurance that all has gone well, or will 
get an error message, such as "line too long". In no case will the 
program bomb, because this is a two-pass program; during the first 
pass, nothing is done to the Basic text, other than making sure 
there is enough space for five-digit line numbers. If any problem 
exists, the BASIC text is unchanged. 

DEVELOPING THE PROGRAM 

Commodore made it a formidable task to decipher the code of 
BASIC sufficiently to be able to make patches for a short renumber 
system. The first obstacle is that the PEEK statement is disabled for 
the area of memory where BASIC resides. But, by sleight-of-hand, a 
little PUNCHing and POKEing and addition of a simple output port 
on PET's memory-expansion connector, the PET disgorged the 
contents of its ROMs into my homebrew machine and onto a disk; 
now, with the capability of having the programs in RAM, where 
breaks could be inserted for diagnosis, the job became a little 
easier. 

Programming a renumber routine is made tedious by the fact that, 
in the BASIC text, the line numbers following the COTO tokens are 
coded in ASCII, whereas the line numbers at the beginning of a 
line of text are coded as two-byte hex numbers. Fortunately, the 
BASIC interpreter has rountines built in to do these conversions 
back and forth between ASCII and hex. The locations of these and 
other routines called by this program are given in TABLE 1. 
Another problem encountered was locating some page zero 
registers, essential to 6502 programming, which are not altered by 
the BASIC itself. In some cases, I use space in the line buffer at 
OOOA-0059, but this cannot be done in the section of the Program 
which uses the line buffer for its original purpose, i.e., inserting a 
line in its proper place in the BASIC text. 
This program uses very little RAM, since no tables are created. 

PROGRAM OPERATION 

The program first sets or clears a flag, depending upon entry point 
(DCM 8181 or 8184), since entry point determines whether the 



renumber job is standard or custom. It then checks to see if 
sufficient memory exists to allow for insertion of spaces for as 
many as five digits for COTO line numbers. An error message (see 
TABLE 2) is generated if there is less than one page available for 
this enlargement of the program. Then, each line of text is moved 
into the line buffer, and if a COTO, GOSUB, or THEN (followed by 
a number) is present, spaces are inserted and the expanded line is 
inserted by BASIC'S own line-insertion routine into the text area, 
just as though you retyped the line on the keyboard • Any lines too 
long for this expansion produce an error message before any harm 
is done to the program. BASIC'S own error routine is called to print 
these messages! The "TOO LONG" message is a shortened version 
of "STRINC TOO LONC" used by BASIC. 

In the text, all statements are compressed into single-byte tokens, 
which I have listed for your reference in TABLE 3. For example, 
COSUB is hex 8D, THEN is A7, etc. This program searches out all 
the 89, 8D and A7 tokens. Cetting the proper ASCII numbers after 
these tokens requires conversion of the ASCII to hexadecimal and 
searching for a matching line number in the text area. If no match 
is found, the guy evidently had a COTO pointing to a non-existent 
line number, so we flag this in the text by an opening parenthesis, 
such as: 

COTO( 

COSUB( :X = Xt1 

IF A = B THEN( 

ON X COTO 1234,( ,5678,9987 



When the progra is listed or run, the need for correction is obvious. 
While we are searching for a matching line number, we keep track 
of the new line number which corresponds to the current position 
in the text, so that when the match is found, the new line number 
can be converted to ASCII and placed directly into the text. 
The actual resequencing process which follows is an anticlimax, 
because it requires so little coding (1E16-1E3E). When the entire 
renumbering job is done, we jump back to BASIC'S warm start 
location. 

USING THE PROGRAM 

If you would like to renumber your program with the standard 
starting line number 100 and increment by 10, simply type 
SYS8181, which directs the program to hex address 1FF5. If you 
would like to choose a different starting line number or increment, 
POKE the desired values at the addresses shown in LISTING 2, and 
type SYS8184 to enter the program at 1FF8. If your BASIC program 
is long, it may take 3-4 seconds to complete the renumbering job. 
After renumbering, running the program will generally write over 
the renumber code, since it occupies the same space as some 
BASIC variables. The only precaution to be taken in renumbering 
is to avoid line numbers which exceed PET's limit of 63999. 
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ROUTINE ENTRY POINT (HEX) 
059 

1F00 



CCA4 

DB1B 
D6D0 
DCAF 

C38B 
CA27 

DC9F 



FUNCTION AND IMPLEMENTATION 

Print an error message from the message table. Enter with X 
containing the location of the message relative to C190. Message 
terminator is ASCII having bit 7 on. 

A duplicate of the original BASIC line insertion routine located at 
C3B4, except for the exit jump. Enter with the line assembled in the 
line buffer OOOA-0059 with 00 as line terminator. Also, the 
character count must be in 005C, and the line number (hex) at 
0008/9. 

Evaluate an expression whose beginning address is in 00C9/CA. We 
use this sub to convert from ASCII to binary, with the result 
appearing in the floating accumulator OOBOt. 

Convert fixed number in 00B1/2 to floating number. Enter with 
X=90 and carry set. 

Convert binary value, such as line number, in floating accumulator 
to two-byte fixed number and place in 0008/9. 

Convert floating number at OOBOt to ASCII and place in a string 
starting at 0101, preceded by a space or minus sign at 0100 and 
terminated by 00. 

BASIC warm start. Prints READY. 

Print message. Enter with ADH in Y, ADL in A. Message is ASCII 
string enough with 00. 

Print the decimal integer whose hex value is in microprocessor 
registers A and X, for example, a line number. 



TABLE 1 - BASIC ROUTINES USED 



• « 



MESSACE 



INTERPRETATION 



CHECK FOR COTOf ETC 

120 

? TOO LONC ERROR 

? OUT OF MEMORY ERROR 

> SYNTAX ERROR 



COTO( 
COSUB( 
ON X COTO( 
IF A = B THEN( 



Successful renumbering. 

Line 120 is too long to renumber. Break into two or more lines, and 
renumber again. 

Program too long to renumber. 

Attempt to RUN program with COTO( remaining in program, or 
attempt to renumber with one of these in program text. 



The opening parenthesis in the text represents attempt to 
reference a non-existent line number. 



Note: Lines of the following form are likely to cause a TOO LONC error. 
100 ON X COSUB 1,2,3,4,5,6,7,8,9,10,11,12 



' « 



TABLE 2 -MESSAGES 
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RENUMB ORG $1D00 
DON RINDSBERG 
CO 1978 N.A.I.L. 

(4 SIGN MEANS PLUS) 



EXTERNAL ROUTINES 



INSERT , 


$1F00 


MESSG , 


$1FCA 


TEMPORARIES 


BUFF 


$0008 


POINT . 


$0019 


POINTX , 


$00iA 


LINCNT , 


$005C 


PTRSO , 


$007A 


PTRS 


$006 A 


FLAG 


$0069 


BUFPTR , 


$006E 


COUNT 


$006F 


STARTC , 


$00DB 


INTC 


$00DD 


CUSTOM , 


$00 DE 



INSERT A LINE INTO TEXT 



LINE BUFFER LOCATION 

TEMP LINE BUFF POINTER 

TEMP POINTER 

NO. CHAR. IN LINE 

ORIGINAL POINTERS 

WORKING POINTERS 

FLAG THE GOTOS 

LINE BUFF POINTER PAGE 7ER0 

COUNTER 

CUSTOM STARTING LINE NO. 

CUSTOM INTERVAL 

FLAG CUSTOM JOB 



BASIC PARAMETERS 



FACC 

BASICP 

BERROR 

WARM 

PRINT 

EVAL 

FIX 

FLOAT 

PNUMBR 

ASCII 



$00B0 BASIC FLOATING ACCUM 

$00C9 BASIC POINTER 

$C359 BASIC ERROR ROUTINE 

$C383 BASIC WARM START 

$CA27 BASIC PRINT ROUTINE 

$CCA4 EXPRESSION EVALUATOR 

$D6D0 CONVERT TO FIXED DP 

$DB1B CONVERT FIXED NMBR TO FLOAT 

$DC9F BASIC PRINT NUMBER 

$DCAF CONVERT NMBR TO ASCII AT $0100 



MAINLINE 



1D00 A5 7D 
1D02 C9 IB 
1D04 90 05 
1D06 A2 52 
1D08 4C FC IE 
1D0B 20 BD IE 
1D0E 20 3F IE 
1D11 F0 2B 
1D13 A2 08 



START 



BOMB 

SPACE 
NEXT 



LDA PTRSO 
CMPIM $1B 
BCC SPACE 
LDXIM $52 
JMP ERROR 
JSR COPY 
JSR DNTST 
BEQ RENUM 
LDXIM $08 



403 GET END TEXT ADH 
ENOUGH ROOM TO EXPAND? 

OUT OF MEMORY 

MAKE CC TEXT POINTERS 
ARE WE DONE THIS SECTION? 

LINE BUFFER START 
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1D15 A0 02 






LDYIM 


$02 


POINT TO LINE NMBR IN TEX 


1D17 Bi 6A 




GETBYT 


LDAIY 


PTRS 


GET BYTE FROM TEXT 


1D19 95 00 






STAZX 


$00 


STORE IN LINE BUFFER 


1D1B C0 04 






CPYIM 


$04 


ZERO HERE NOT TERMINATOR 


ID ID 90 04 






BCC 


SKIPA 




1D1F C9 00 






CMPIW 


$00 




1D21 F0 04 






BEQ 


TERM 


GOT THE- TERMINATOR 


1D23 Cg 




SKIPA 


I NY 






1D24 Eg 






INX 






1D25 D0 F0 






BNE 


GETBYT 


FORCED BRANCH 


1D27 20 47 


IE 


TERM 


JSR 


EDIT 


EDIT ONE LINE 


1D2A A5 69 






LDA2 


FLAG 




1D2C D0 0A 






BNE 


SKIPB 


SKIP IF NO GOS FLAGGED 


1D2E 3g 






SEC 






1D2F A5 6E 






LDA 


BUFPTR 




1D31 E9 05 






SBCIM 


$05 


CORRECT BYTE COUNT 


1D33 S5 5C 






STA 


LINCNT 


NEED CHAR COUNT 


1D35 4C 00 


IF 




JMP 


INSERT 


BUT RETURN TO NEXT LINE 


1D38 20 C7 


IE 


SKIPB 


JSR 


UPDATE 


POINT TO NEXT LINE 


1D3B 4C 0E 


ID 




JMP 


NEXT 




1D3E 20 BD 


IE 


RENUM 


JSR 


COPY 


THE POINTERS 


1D41 20 3F 


IE 


NEXTR 


JSR 


DNTST 


ARE WE DONE THIS PORTION? 


1D44 D0 03 






BNE 


NOTDON 




1D46 4C 16 


IE 




JMP 


RESEQ 




1D49 20 AE 


IF 


NOTDON 


JSR 


STRTLN 


GET STARTING LINE NMBR 


1D4C A0 03 




SCAN 


LDYIM 


$03 


POINT TO TEXT-1 


1D4E Cg 




SCANA 


I NY 






1D4F Bi 6A 




SCANX 


LDAIY 


PTRS 


GET A BYTE 


1D51 D0 06 






BNE 


GOTEST 


BRANCH IF NOT TERMINATOR 


1D53 20 C7 


IE 




JSR 


UPDATE 


GO TO NEXT LINE 


1D56 4C 41 


ID 




JMP 


NEXTR 




1D59 C9 89 




GOTEST 


CMPIM 


$89 


GOT A GOTO? 


1D5B F0 15 






BEQ 


GOTO 




1B5D C9 8D 






CMPIM 


$8D 


GOT A GOSUB? 


1D5F F0 11 






BEQ 


GOTO 




1D61 C9 A7 






CMPIM 


$A7 


GOT A THEN? 


1D63 D0 E9 






BNE 


SCANA 




1D65 C8 




THEN 


INY 




POINT TO NEXT 


1D66 Bl 6A 






LDAIY 


PTRS 




1D68 C9 20 






CMPIM 


$20 


IGNORE SPACES 


1D6A F0 F9 






BEQ 


THEN 




1D6C 20 E5 


IE 




JSR 


TSTDGT 


TEST FOR NUMBER 


1D6F B0 Eg 






BCS 


GOTEST 




1D71 88 






DEY 






1D72 C8 




GOTO 


INY 






1D73 84 19 






STY 


POINT 


SAVE A MOMENT 


1D75 9g 






TYA 






1D76 18 






CLC 






1D77 65 6A 






ADC 


PTRS 


POINT TO ASCII NMBRS 


1D79 85 C9 






STA 


BASICP 




1D7B 20 ED 


IF 




JSR 


PATCH 


BUG FIX 


1D7E EA 






NOP 






1D7F 20 A4 


CC 




JSR 


EVAL 


CALL BASIC EVALUATOR 


1B82 20 D0 


D6 




JSR 


FIX 


AND BASIC FIX ROUTINE 
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1D85 A5 7A 


SEARCH 


LDA PTRSO 


SETUP SEARCH POINTERS 




1D87 85 iA . 




STA POINTX 






1D89 A5 7B 




LDA PTRSO 


401 




1D8B 85 IB 




STA POINTX 


401 




1D8D A0 00 


SRCHLP 


LDYIM $00 






1D8F Bl 1A 




LDAIY POINTX 


GET NEXT BYTE 




1D91 C8 




INY 






1D92 11 1A 




ORAIY POINTX 


TEST FOR TWO ZERO BYTES 




1D94 D0 10 




BNE NOTEND 


ZEROES MARK EOT 




1D96 A9 20 




LDAIM $20 


GET A SPACE 




JD98 8D 00 01 




STA $0100 


ASCII WORKSPACE 




1D9B A9 28 




LDAIM $28 


GET OPEN PAREN 




1D9D 8D 01 01 




STA $0101 






1DA0 88 




DEY 






1DA1 8C 02 01 




STY $0102 


TERMINATE WITH ZERO 




1DA4 F0 20 




BEQ MVASC 


FORCED BRANCH 




1DA6 A0 02 


NOTEND 


LDYIM $02 






1DA8 Bl 1A 




LDAIY POINTX 


GET LINE NO. LOW 




1DAA C5 08 




CMP BUFF 


MATCH? 




1DAC D0 55 




BNE NOMAT 






1DAE C8 




INY 






1DAF Bl 1A 




LDAIY POINTX 


GET LINE NO. HIGH 




1DB1 C5 09 




CMP BUFF 


101 




1DB3 D0 4E 




BNE NOMAT 






1DB5 A6 10 


MATCH 


LDX BUFF 


408 GET CURRENT LINE NMBR 




1DB7 86 B2 




STX FACC 


402 




1DB9 A5 11 




LDA BUFF 


409 SECOND BYTE 




1DBB 85 Bl 




STA FACC 


401 




1DBD A2 90 




LDXIM $90 


SETUP FOR FLOAT 




1DBF 38 




SEC 






1DC0 20 IB DB 




JSR FLOAT 






1DC3 20 AF DC 




JSR ASCII 


TO $0101 PLUS 




1DC6 A2 FB 


MVASC 


LDXIM $FB 


MINUS 5 




1DC8 A4 19 




LDY POINT 






1DCA BD 06 00 


LOOPA 


LDAAX $0006 






1DCD F0 08 




BEQ BLANKS 


TERMINATOR ZERO 




1DCF 91 6A 




STAIY PTRS 






1DD1 C8 




INY 






1DD2 E8 




I NX 






1DD3 D0 F5 




BNE LOOPA 






1DD5 F0 0C 




BEQ COMMA 






1DD7 A9 20 


BLANKS 


LDAIM $20 


GET SPACE 




1DD9 91 6A 




STAIY PTRS 


STORE IT 




1DDB C8 




INY 






1DDC E8 




I NX 






1DDD D0 F8 




BNE BLANKS 






1DDF 88 




DEY 






1DE0 D0 01 




BNE COMMA 






1DE2 C8 


COMMX 


INY 






1DE3 Bl 6A 


COMMA 


LDAIY PTRS 


GET NEXT BYTE 




1DE5 20 E5 IE 




JSR TSTDGT 


TEST FOR NUMBER 




IDES B0 06 




BCS NOTNUW 






IDEA A 9 20 




LDAIM $20 


SPACE 




1DEC 91 6A 




STAIY PTRS 


STORE IT 




IDEE D0 F2 




BNE COMMX 


FORCED 




1DF0 C9 20 


NOTNltt 


1 CMPIM $20 


SPACE? 
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1DF2 F0 


EE 






BEQ COMMX 




1DF4 C9 


2C 






CMPIM $2C 


COMMA? 


IDF6 08 








PHP 


DEFER TEST 


1DF7 20 


AE 


IF 




JSR STRTLN 


GET STARTING LINE NMBR 


1DFA 28 








PLP 


NOW TEST 


1DFB D0 


03 






BNE JSCANX 


NOT COMMA 


1DFD 4C 


72 


ID 




JMP GOTO 


GOT A COMMA 


1100 4C 


4F 


ID 


JSCANX 


JMP SCANX 




1E03 20 


EE 


IE 


NOMAT 


JSR INCLIN 


INCR NEW LINE NMBR 


1E06 A0 


00 






LDYIM $00 




1E08 Bl 


1A 






LDAIY POINTX 


GET NEXT LINE ADDRESS 


1E0A 48 








PHA 




1E0B C8 








INY 




1E0C Bl 


1A 






LDAIY POINTX 




1E0E 85 


IB 






STA POINTX 


&01 


1E10 68 








PLA 




1E11 85 


1A 






STA POINTX 




JE13 4C 


8D 


ID 




JMP SRCHLP 


BACK TO SEARCH AGAIN 


1E16 20 


AE 


IF 


RESEQ 


JSR STRTLN 


SETUP STARTING LINE 


1E19 20 


BD 


IE 




JSR COPY 


COPY THE POINTERS 


lEiC 20 


3F 


IE 


LOOPR 


JSR DNTST 


DONE? 


1E1F F0 


13 






BEQ WINDUP 




1E21 A0 


02 






LDYIM $02 


POINT TO LINE NMBR 


1E23 A5 


10 






LDA BUFF 


&08 GET NEW ONE 


1E25 91 


6A 






STAIY PTRS 


STORE IT 


1E27 C8 








INY 




1E28 A5 


11 






LDA BUFF 


409 


1E2A 91 


6A 






STAIY PTRS 




IE2C 20 


C7 


IE 




JSR UPDATE 


ADVANCE TO NEXT LINE 


1E2F 20 


EE 


IE 




JSR INCLIN 


INCREMENT LINE NMBR 


1E32 90 


E8 






BCC LOOPR 


FORCED 


1E34 A0 


IF 




WINDUP 


LDYIM MESSG 


/100 


1E36 A9 


CA 






LDAIM MESSG 




1E38 20 


27 


CA 




JSR PRINT 


END MESSAGE 


1E3B 58 








CLI 


ALLOW KEYPRESSES 


1E3C 4C 


8B 


C3 




JMP WARM 


BACK TO BASIC 


1E3F A0 


00 




DNTST 


LDYIM $00 




1E41 Bl 


6A 






LDAIY PTRS 


GET NEXT BYTE 


1E43 C8 








INY 


ADVANCE TO NEXT 


1E44 11 


6A 






ORAIY PTRS 


OR WITH LAST TO FIND 0000 


1E46 £0 








RTS 




1E47 A2 


09 




EDIT 


LDXIM BUFF 


101 


1E49 86 


6E 






STX BUFPTR 




1E4B 86 


69 






STX FLAG 


SET FLAG 


1E4D E6 


6E 




EDITX 


INC BUFPTR 




1E4F A6 


6E 






LDX BUFPTR 




iE51 B5 


00 






LDAZX $00 




1E53 F0 


71 






BEQ RTS 




1E55 C9 


89 




EDITY 


CMPIM $89 


GOTO? 


1E57 F0 


19 






BEQ SPACES 
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APRI 



• < 



t. < 



• 



• 



• 



1E59 


C9 8D 




CMPIM $8D 


GOSUB? 


|= 


1E5B 


F0 15 




BEQ SPACES 






1E5D 


C9 A7 




CMPIM $A7 


THEN? 




1E5F 


D0 EC 




BNE EDITX 


BACK FOR MORE 




1E61 


E6 6E 


THENN 


INC BUFPTR 






1E63 


A6 6E 




LDX BUFPTR 






1E65 


B5 00 




LDAZX $00 


BYTE AFTER THEN 




XE67 


C9 20 




CMPIM $20 


IGNORE SPACES 




1E69 


F0 F6 




BEQ THENN 






1E6B 


20 E5 IE 




JSR TSTDGT 


IS IT NUMBER? 




1E6E 


B0 E5 




BCS EDITY 


IF NOT, GO BACK 




1E70 


C6 6E 




DEC BUFPTR 






1E72 


A2 09 


SPACES 


LDXIM BUFF 


&01 TEXT-1 




1E74 


E8 


SPACEX 


INX 






1E75 


B5 00 




LDAZX $00 


LOOK FOR TERMINATOR 




1E77 


D0 FB 




BNE SPACEX 






1E7 9 


E0 54 




CPXIM $54 


LINE TOO LONG? 


L 


1E7B 


90 0C 




BCC OKAY 






1E7D 


A5 09 




LDA BUFF 


101 


: 


1E7F 


A6 08 




LDX BUFF 


GET BAD LINE NMBR 




1E81 


20 9F DC 




JSR PNUMBR 


PRINT IT 




1E84 


A2 BB 




LDXIM $BB 


TOO LONG MESSG 




1E86 


4C FC IE 




JMP ERROR 






1E89 


A2 06 


OKAY 


LDXIM $06 


DIGITS PLUS ONE 




1E8B 


BG 6F 




STX COUNT 






1E8D 


E6 6E 


LOOP 


INC BUFPTR 






1E8F 


C6 6F 




DEC COUNT 






1E91 


F0 12 




BEQ COMMAS 






1E93 


A6 6E 




LDX BUFPTR 






1E95 


B5 00 




LDAZX $00 






JE97 


C9 20 




CMPIM $20 


TEST FOR SPACES 




1E99 


F0 F2 




BEQ LOOP 






1E9B 


20 E5 IE 




JSR TSTDGT 


TEST FOR NUMBER 




1E9E 


90 ED 




BCC LOOP 






1EA0 


20 D5 IE 




JSR UPONE 


MAKE ROOM FOR ONE DIGIT 


1EA3 


D0 E8 




BNE LOOP 


FORCED BRANCH 




1EA5 


A0 00 


COMMAS 


LDYIM $00 






1EA7 


84 69 




STY FLAG 


WE WERE HERE 




1EA9 A6 6E 


FINDT 


LDX BUFPTR 






1EAB 


B5 00 




LDAZX $00 


FIND TERMINATOR 




1EAD 


F0 17 




BEQ RTS 






1EAF 


C9 20 




CMPIM $20 


SPACE? 




1EB1 


D0 04 




BNE TEST 






IEB3 


E6 6E 




INC BUFPTR 




i 


JEB5 


D0 F2 




BNE FINDT 


FORCED 




1EB7 


C9 2C 


TEST 


CMPIM $2C 


COMMA? 


I 


1EB9 


F0 B7 




BEQ SPACES 






1EBB 


D0 90 




BNE EDITX 




! 


1EB0 


A2 04 


COPY 


LDXIM $04 


COPY 4 BYTES 




1EBF 


B5 79 


LP 


LDAZX $79 






1EC1 


95 69 




STAZX $69 


COPY POINTERS 




1EC3 


CA 




DEX 






1EC4 


D0 F9 




BNE LP 






1EC6 


60 


RTS 


RTS 
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1EC7 A0 00 


UPDATE 


LDYIM $00 




1EC9 Bl 6A 




LDAIY PTRS 


GET LINK ADL 


1ECB 48 




PHA 


HOLD ON STACK 


1ECC C8 




INY 




lECD Bl 6A 




LDAIY PTRS 


GET LINK ADH 


1ECF 85 6B 




STA PTRS 


401 STORE LINK ADH 


lEDl 68 




PLA 




1ED2 85 6A 




STA PTRS 


STORE LINK ADL 


1ED4 60 




RTS 




1ED5 A2 59 


UPONE 


LDXIM BUFF 


451 END BUFFER 


1ED7 CA 


LOOPU 


DEX 




1ED8 B5 00 




LDAZX $00 


GET A BYTE 


1EDA 95 01 




STAZX $01 


MOVE UP ONE 


1EDC E4 6E 




CPX BUFPTR 




1EDE D0 F7 




BNE LOfcPU 




1EE0 A9 20 




LDAIM $20 


INSERT SPACE 


1EE2 95 00 




STAZX $00 




1EE4 60 




RTS 




1EE5 C9 30 


TSTDGT 


CMPIM *0 




1EE7 90 03 




BCC SET 




1EE9 C9 3A 




CMPIM ': 




1EEB 60 




RTS 


WITH CARRY CLEAR 


1EEC 38 


SET 


SEC 


CARRY SET IF NON-NMBR 


lEED 60 




RTS 




IEEE 18 


INCLIN 


CLC 




1EEF A5 10 




LDA BUFF 


408 


lEFl 65 12 




ADC BUFF 


40A 


1EF3 85 10 




STA BUFF 


408 


1EF5 A5 11 




LDA BUFF 


409 


1EF7 6 9 00 




ADCIM $00 


ADD INTERVAL 


1EF9 85 11 




STA BUFF 


409 TO CURRENT LINE 


1EFB 60 




RTS 




1EFC 58 


ERROR 


CLI 


ALLOW KEYPRESS 


1EFD 4C 59 C3 




JMP BERROR 


BASIC ERROR PROCESSOR 


1FAE 




ORG S1FAE 




1FAE A9 64 


STRTLM 


1 LDAIM $64 


DEFAULT 100 


1FB0 85 10 




STA BUFF 


408 


1FB2 A9 00 




LDAIM $00 


HIGH ORDER 


1FB4 85 11 




STA BUFF 


409 


1FB6 A2 0A 




LDXIM $0A 


INTERVAL 10 


1FB8 A5 DE 




LDA CUSTOh 


1 TEST FOR CUSTOM 



< f 



1 I 
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1FBA 10 0A 


BPL 


SKIPL 




1FBC A6 DD 


LDX 


INTC 


CUSTOM INTERVAL 


1FBE A5 DB 


LDA 


STARTC 


CUSTOM START 


1FC0 85 10 


STA 


BUFF 


408 


1FC2 A5 DC 


LDA 


STARTC 


401 


1FCA 85 11 


STA 


BUFF 


40$ 


1FC6 86 12 SKIPL STX 


BUFF 


40A 


1FC8 60 


RTS 






JFC9 EA 


NOP 







FINAL MESSAGE $1FCA THROUGH $1FEC 
•CHECK FOR GOTOl ETC" 



1FED 



PATCH ORG $1FED 



1FED A5 6B 
1FEF 69 00 
1FF1 85 CA 
1FF3 60 
1FF4 EA 



LDA PTRS 401 

ADCIM $00 

STA BASICP 401 

RTS 

NOP 



1FF5 18 
1FF6 90 01 
1FF8 38 
1FF9 78 
1FFA 66 DE 
1FFC 4C 00 



ID 



ENTRY CLC 

BCC 

ENTRYA SEC 

ALL SEI 

RORZ 

JMP 



CLEAR FOR STANDARD 

ALL 

SET FOR CUSTOM 
DISABLE KEYS 

CUSTOM FLAG IN BIT 7 

START 



Who regularly publishes more info on 
APPLEs, PETs. KIMs, SYMs, AIMs, and 
olher 6502 based systems, products and 
programs than 



(kilobaud) BVII 

iiuicnrttLC «uc 

creative computing 

COMBINED? 



jMQoiatgil 



that's 
who 



the full size magazine devoted to 6502 
information. Now published monthly $12.00 
per year in USA. 

Now you can get all of MICRO by buying 
"The BEST of MICRO Volume I" for S7.00 
(includes shipping) and starting your 
subscription wilh issue in. 



PO Box 3, 



S. Chelmsford, 
617/256-3649 



MA. 01824 
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CLASSIFIED ADS 

ZIPTAPE loads 8K BASIC in 15 seconds! 
Slower than a speeding disc? Sure, but 
it only costs $22.50 plus $1.00 S&H. 
$3.00 extra for software on KIM cassette. 
Described in MICRO #6. SASE for info. 
Lew Edwards, 1451 Hamilton Ave., Trenton, 
NJ 08629. 

ADVERTISE in MICRO for only $10.00 !!! 
A classified ad such as the one above, 
may be run in this new Classified Ad 
section for $10.00. Ad may not exceed 
six lines, and only one ad per person, 
company, etc. Must relate to 6502 
type stuff, and ad must be prepaid. 
You will reach over 6000 readers!!! 

The TARGET for users of Rockwell' s 
AIM 65. Find out how to use the printer, 
keyboard and display. Reviews of 
upcoming Assembler and BASIC in ROMs. 
Six bimonthly issues for $5.00 US and 
Canada ($12.00 elsewhere). Contact: 
Don Clem, RR#2, Spencerville, OH 45887 



INSERT ORG $1F00 

DUPLICATE OF BASIC INSERT ROUTINE 
EXCEPT FOR EXIT JUMP 



1F00 


20 


22 C5 


1F03 


90 


44 


1F05 


A0 


01 


JF07 


Bl 


AE 


1F09 


85 


72 


JF0B 


A5 


7C 


1F0D 


85 


71 


1F0F 


A5 


AF 


lFll 


85 


74 


1F13 


A5 


AE 


1F15 


C8 




1F16 


Fl 


AE 


1F18 


18 




1F19 


65 


7C 


1F1B 


85 


7C 


1F1D 


85 


73 


1F1F 


A5 


7D 


1F21 


69 


FF 


1F23 


85 


7D 


JF25 


E5 


AF 


1F27 


AA 




1F28 


38 




1F29 


A5 


AE 


1F2B 


E5 


7C 


JF2D 


AS 




1F2E 


B0 


03 


1F30 


E8 




1F31 


C6 


74 


1F33 


18 




1F34 


65 


71 


1F36 


90 


03 


1F38 


C6 


72 


1F3A 


18 




1F3B 


Bl 


71 


1F3D 


91 


73 


1F3F 


C8 




1F40 


D0 


F9 


1F42 


E6 


72 


1F44 


E6 


74 


1F46 


CA 




1F47 


D0 


F2 


JF49 


A9 


0A 


1F4B 


F0 


17 


1F4D 


A5 


86 


1F4F 


A4 


87 


1F51 


85 


82 


1F53 


84 


83 



INSA 



INSB 



INSC 



JSR 


$C522 


1F55 


A5 


7C 


LDAZ 


$7C 


BCC 


INSC 


1F57 


85 


A9 


STAZ 


$A9 


LDYIM 


$01 


1F59 


65 


5C 


ADCZ 


$5C 


LDAIY 


$AE 


1F5B 


85 


A7 


STAZ 


$A7 


STAZ 


$72 


1F5D 


A4 


7D 


LDYZ 


$7D 


LDAZ 


$7C 


1F5F 


84 


AA 


STYZ 


$AA 


STAZ 


$71 


1F61 


90 


01 


BCC 


INSD 


LDAZ 


$AF 


1F63 


C8 




INY 




STAZ 


$74 


1F64 


84 


A8 INSD STYZ 


$A8 


LDAZ 


$AE 


1F66 


20 


DA C2 


JSR 


$C2DA 


INY 




1F69 


A5 


80 


LDAZ 


$80 


SBCIY 


$AE 


1F6B 


A4 


81 


LDYZ 


$81 


CLC 




1F6D 


85 


7C 


STAZ 


$7C 


ADCZ 


$7C 


1F6F 


84 


7D 


STYZ 


$7D 


STAZ 


$7C 


1F71 


A4 


5C 


LDYZ 


$5C 


STAZ 


$73 


1F73 


88 




DEY 




LDAZ 


$7D 


1F74 


B9 


06 00 INSE LDAAY 


$0006 


ADCIM 


$FF 


1F77 


91 


AE 


STAIY 


$AE 


STAZ 


$7D 


1F7 9 


88 




DEY 




SBCZ 


$AF 


1F7A 


10 


F8 


BPL 


INSE 


TAX 




1F7C 


20 


67 C5 INSF JSR 


$C567 


SEC 




1F7F 


A5 


7A 


LDAZ 


$7A 


LDAZ 


$AE 


1F81 


A4 


7B 


LDYZ 


$7B 


SBCZ 


$7C 


1F83 


85 


71 


STAZ 


$71 


TAY 




1F85 


84 


72 


STYZ 


$72 


BCS 


INSA 


1F87 


18 




CLC 




INX 




1F88 


A0 


01 INSG LDYIM 


$01 


DECZ 


$74 


1F8A 


Bl 


71 


LDAIY 


$71 


CLC 




1F8C 


D0 


03 


BNE 


INSH 


ADCZ 


$71 


1F8E 


4C 


38 ID 


JMP 


$1D3S 


BCC 


INSB 


1F91 


A0 


04 INSH LDYIM 


$04 


DECZ 


$72 


1F93 


C8 


INSI INY 




CLC 




1F94 


31 


71 


LDAIY 


$71 


LDAIY 


$71 


1F96 


D0 


FB 


BNE 


INSI 


STAIY 


$73 


1F98 


C8 




INY 




INY 




1F99 


98 




TYA 




BNE 


INSB 


1F9A 


65 


71 


ADCZ 


$71 


INCZ 


$72 


1F9C 


AA 




TAX 




INCZ 


$74 


1F9D 


A0 


00 


LDYIM 


$00 


DEX 




1F9F 


91 


71 


STAIY 


$71 


BNE 


INSB 


1FA1 


A5 


72 


LDAZ 


$72 


LDAIM 


$0A 


1FA3 


69 


00 


ADCIM 


$00 


BEQ 


INSD 


1FA5 


C8 




INY 




LDAZ 


$86 


1FA6 


91 


71 


STAIY 


$71 


LDYZ 


$87 


1FA8 


86 


71 


STXZ 


$71 


STAZ 


$82 


1FAA 


85 


72 


STAZ 


$72 


STYZ 


$83 


1FAC 


90 


DA 


BCC 


INSG 



f i 



l 
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LOCATION 
HfX DECIMAL VALUE TO BE POKED 

(X)DB 219 Low order starting line number (wieght 1) 

OODC 220 High order starting line number (weight 256) 

OODD 221 Increment desired (1-255) 

Example: POKE 219,232 
POKE 220,3 
POKE 221,50 

This will give a starting line number of 3 x 256 t 232 = 1000, and 
following lines will be incremented by 50. 

LISTING 2 - NON-STANDARD LINE RENUMBER 



STATEMENT TOKEN 



END 

FOR 

NEXT 

DATA 

INPUT* 

INPUT 

DIM 

READ 

LET 

GOTO 

RUN 

IF 

RESTORE 

GOSUB 

RETURN 

REM 

STOP 

ON 

WAIT 

LOAD 

SAVE 

VERIFY 

DEF 

POKE 

PRINT* 

PRINT 

CONT 

LIST 

CLR 

CMD 

SYS 

OPEN 

CLOSE 

GET 

NEW 

TAB( 

TO 



80 
81 
82 

83 
84 
85 
86 
87 
88 
89 
8A 
8B 
8C 
8D 
8E 
8F 
90 
91 
92 

93 
94 

95 
96 
97 
98 
99 
9A 
9B 
9C 
9D 
9E 
9F 
AO 
A1 
A2 
A3 
A4 



STATEMENT TOKEN 



FN 

SPC( 

THEN 

NOT 

STEP 



* 

/ 
t 

AND 

OR 

> 

< 

SGN 

INT 

ABS 

USR 

FRE 

POS 

SQR 

END 

LOG 

EXP 

COS 

SIN 

TAN 

ATN 

PEEK 

LEN 

STR$ 

VAL 

ASC 

CHR$ 

LEFT$ 

RIGHT$ 

MID$ 



A5 
A6 

A7 
A8 
A9 
AA 
AB 
AC 
AD 
AE 
AF 
BO 
B1 
B2 

B3 
B4 
B5 
B6 
B7 
B8 

B9 
BA 
BB 
BC 
BD 
BE 
BF 
CO 
C1 
C2 

C3 
C4 

C5 
C6 
C7 
C8 
C9 
CA 



ENTERING THE PROGRAM 

The hard way to load the program into your PET is to convert my 
hex listing into decimal and POKE each byte into memory. This is, 
of course, a challenge to your accuracy and diligence, although it 
may take only slightly longer than renumbering by hand. It is only 
a little easier to write a BASIC program which will accept the hex 
data and convert to decimal, with the hex incorporated in DATA 
statements and obtained by the READ statement With this 
alternate, the program can be recorded for future use. 

To make loading painless (excpet for the wallet), I have arranged 
to make tapes available through NAIL*, Drawer F, Mobile, 
Alabama 36601. These tapes load the machine-language program 
directly into high memory. Ask for "SYS8181" and send $18.18. By 
the way, they also have a dandy PET monitor called SYS7171 for 
$29.71, which has machine language capabilities, the ability to 
co-reside in RAM with BASIC programs, but also has the very 
helpful feature of being able to APPEND one BASIC program to 
another, just like the big boys do, with interleaving of lines. Like 
SYS8181, it uses the BASIC line-inserting routine to do the merging, 
just as though you typed all those new lines on your keyboard. I 
used a version of this monitor to develop SYS8181. If there is 
sufficient interest out there, I may develop a ROM version of 
SYS8181, but vou will have to be a hardware buff to wire it into 
your PET 

Since PET BASIC was written by the same company who write 
APPLESOFT and is similar, some APPLE owners may wish to obtain 
a disassembled, documented listing of this renumbering program 
I from me for $5 00. 

'National Artficial Intelligence Laboratory 

_____ 

FORMERLY PETSHACK 

PET™ SCHEMATICS 

FOR ONLY $24 95 YOU GET: 

24' X 30" schematic of Ihe CPU board, plus oversized schematics of the Video 
Monitor and Tape Recorder, plus complete Parts layout - all accurately and 
painstakingly drawn to the minutest detail 

PET™ ROM ROUTINES 

FOR ONLY $19 95 YOU GET 

Complete Disassembly listings of all 7 ROMS, plus identified subroutine entry 

points; Video Monitor. Keyboard routine. Tape Record and Playback routine. Real 

Time Clock, etc. To entice you we are also including our own Machine Language 

Monitor program for your PET using the keyboard and video display. 

You can have the Monitor program on cassette tor only $9.95 extra 

PET to PARALLEL INTERFACE with 5V 8A power supply $74 95 

PET to 2nd CASSETTE INTERFACE $49 95 

Send tor our free SOFTWARE BROCHURE. Dealer inquiries welcome. 

PET™ EXPANDOR PRINTER 
PRINTER PRICE with pet interface $525 

• Small size of 4. 5"H x 12V4"W * 9Vj"D 

• Impact printing - 3 copies 

• Prints 80 columns wide 

• Print Cylinder - not a matrix 

• Uses 8!6" paper, pressure or pin teed 

• Easy to maintain yourself, or return to us 

• Regular Paper - Coated paper not required 

• Lightweight. 11'/? lbs with cover 

• Prints 10 characters per second 

• 64 Character ASCII Character Set ^_ 

• Full Documentation included ^^^. 

This is the ideal, low cost, reliable, self maintained 
printer with which to complete your PET^system. 

P.S. SOFTWARE HOUSE 

P.O. Box 966 Mishawaka, I N 465 44 

(Qg Tel: (219) 255-3408 3£i 




TABLE 3 
TOKENS (shorthand used 



in BASIC text) 



APRIL 1979 



MICRO 11:47 
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QUALITY 
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3-D ANIMATION 



A-$24.95 



w m to 



mk «mc *mm*r«a» rr*& «>* » 



AUDIO ENGINEER 



A-$29.95 




STRATO LASER 



A-$15.95 




SUPER STARWARS 



A-$15.95 




Apple FORTH 
Pet FORTH 

FORTH is a unique threaded language that 
is ideally suited for systems and applications 
programming on a micro-processor system. 
The user may have the interactive FORTH 
Compiler/Interpreter system running 
stand-alone in 4K to 6K bytes of RAM. 
The system also offers a built-in incremental 
assembler and text editor. Since the FORTH 
language is vocabulary based, the user may 
tailor the system to resemble the needs and 
structure of any specific application. 
Programming in FORTH consists of defining 
new words, which draw upon the existing 
vocabulary, and which in turn may be used 
to define even more complex applications. 
Reverse Polish Notation and LIFO stacks 
are used in the FORTH system to process 
arithmetic expressions. Programs written 
in FORTH are compact and very fast. 

APPLE II COMPUTER $34.95 

PET 2001 COMPUTER $34.95 



Apple PIE 

PIE (PROGRAMMA IMPROVED EDITOR) 
is a two-dimensional cursor-based editor 
designed specifically for use with memory- 
mapped and cursor-based CRT's. It is totally 
different from the usual line-based editors, 
which were originally designed for Teletypes. 
The keys of the system input keyboard are 
assigned specific PIE Editor function com- 
mands. PIE includes the following features: 
blinking cursor; cursor movement up, down, 
right, left, home, plus tabs; character insert 
and delete, string search forwards and back- 
wards; page scrolling; GO TO line number, 
plus top or bottom of file, line insert and 
delete anywhere on screen; append and 
clear to end of line; move and copy buffer. 



APPLE II COMPUTER 



$19.95 



All orders include 3% postage and handling. 
Apple II is a registered trademark of Apple 
Computer, Inc. Pet is a registered trademark 
of Commodore International and TRS-80 is 
a registered trademark of Radio Shack. 
California residents add 6% sales tax. 
VISA & MASTERCHARGE Accepted. 
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DOMINOES 



P-$9.95 



E si^r 
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BATTLESHIP 



P-$9.95 



ANALYST 



A-$19.95 



APPLE II LIGHT PEN 



$34.95 



PROGRAMMA 
INTERNATIONAL, Inc. 

3400Wilshire Blvd. 
Los Angeles, CA 90010 

(213)384-0579 
384-1116 
384-1117 

Dealer Inquiries Invited 
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softside 
soi t ware 

305 Riverside Drive New York. N.Y 10025 
812 -866*8058 
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program. 



1 GRAPHICS PAC Quadruple your PET's graphic resolution. Do not 

be stuck with the PET's cumbersome 25X40 1000 
point display. With the Graphics Pac you can indi- 
vidually control 4000 points on screen. It's great for graphing, plotting, and gaming. The 
Pac is a set of three programs with full documentation. PLOT places coordinate 0,0 in the 
screen's upper left hand corner. For more sophisticated applications the Pac includes 
GRAPH which plots point 0,0. in the center of the screen allowing you to plot equations in 
all four quadrants. As a bonus a Hi Res Doodle game is included. All this on a high qual- 
ity cassette for $9.95 

2 ASSEMBLER 2001 is a full featured assembler for your PET micro- 

computer that follows the standard 6502 set of ma- 
chine language mnemonics. Now you can write 
machine code programs. Store your assembled programs, load them, run them, and even 
list your programs and various PET subroutines. Unlike other assemblers this is one pro- 
gram! You do not have to go through a three tape process to edit and run a program. Of 
course to make more space you can trim out the features you do not need. Assembler 2001 
allows you to run through the USR of SYS commands. This valuable program is offered at 
$15.95. 

3 BIKE An exciting new simulation that puts you in 

charge of a bicycle manufacturing empire. Juggle 
inflation, breakdowns, seasonal sales variations, 
inventory, workers, prices, machines, and ad campaigns to keep your enterprise in the 
black. Bike is dangerously addictive. Once you start a game you will not want to stop. To 
allow you to take short rest breaks. Bike lets you store the data from your game on a tape 
so you can continue where you left off next time you wish to play. Worth a million in fun, 
we'll offer BIKE at $9.95. 

4PINBALL Dynamic usage of the PET's graphics features 

when combined with the fun of the number 1 arcade 
game equals an action packed video spectacle for 
your computer. Bumpers, chutes, flippers, free balls, gates, a jackpot, and a little luck 
guarantee a great game for all. $9.95. 

5 SUPER DOODLE Give your PET a workout. This program really 

puts the PET's graphics to work. Super Doodle lets 
you use the screen of your PET like a sketch pad. 
Move a cursor in eight directions leaving a trail of any of the 256 charaetrs the PET can 
produce. New features include an erase key that automatically remembers your last five 
moves, a return to center key, and clear control. Why waste any more paper buv Super 
Doodle for onlv $9.95. 

6 DRIVING ACE Non stop excitement with a fast moving, high 

paced version of your favorite video arcade racing 
. . , games. Shift up! Shift Down! Watch your gas, and 

be careful on those hairpin turns. This dynamite tape has the two most common arcade 
racing games specially adapted to run on your PET computer. Driving Ace simulates an 
endless road packed with tight turns and gentle, but teasing, twists. Starting with fifty 
gallons oi gas. how far can you go with a minimum of accidents? Grand Prix places you 
and your car on a crowded racing track. Race the clock and be careful steering-around the 
fast but packed Grand Prix track. $9.95 

Dealer Rates On Request 
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microsystems 



P.O. Box687 224 S.E. 16th Street Ames, Iowa 50010 

515/232-8187 

DB/65 

A complete hardware/software debug system for the Rockwell, Synertek, MOS/Technology 6500 

microprocessor family. 
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Features 



Standard in-circuit emulator 

Hardware breakpoints 

Single step mode 

Eight software breakpoints 

Real-time software breakpoints 

RS 232C or current loop terminals 

Symbolic disassembly of user program 

Serial/parallel load capability 

Program trace of instructions and registers 



Prom resident debug monitor 

Software history of instruction addresses 

2K ram standard with sockets for additional 
6K if required 

Scope sync output 

User NMI and IRQ vectors supported 

Write protect 

User program may reside in high memory 



SINGLE QUANTITY PRICE = $1450 



